TECHNICAL  PAPER 
CAA.-TP-84-1 1 


UDRARY 

mmmrnmmmmmm 

NAVAL  POSTGRADUATE  SCHOOL 
MONTEREY,  CALIFORNIA  93343 


ADF860017 


PARTIAL  SUBSTITUTION  AND  OTHER 
MODIFICATIONS  TO  THE  PARCOM  MODEL 

(SHORT  TITLE: 

PARCOM  PARTIAL  SUBSTITUTION) 

/\)  ® 


NOVEMBER  1984 


PREPARED  BY 

FORCE  SYSTEMS  DIRECTORATE 

US  ARMY  CONCEPTS  ANALYSIS  AGENCY 
8120  W00DM0NT  AVENUE 
BETHESDA,  MARYLAND  20814-2797 


20100824  271 


DISCLAIMER 

The  findings  of  this  report  are  not  to  be  construed  as  an  official 
Department  of  the  Army  position,  policy,  or  decision  unless  so  designated  by 
other  official  documentation.  Comments  or  suggestions  should  be  addressed 
to: 

Director 

US  Army  Concepts  Analysis  Agency 
ATTN:  CSCA-FS 
8120  Woodmont  Avenue 
Bethesda,  MD  20814-2797 


CAA- TP- 84- 1 1 


UNCLASSIFIED 


SECURITY  CLASSIFICATION  OF  This  page  'H7i*n  Data  Entarad) 


REPORT  DOCUMENTATION  PAGE 

READ  INSTRUCTIONS 

BEFORE  COMPLETING  FORM 

1.  REPORT  NUMBER  2.  GOVT  ACCESSION  NO. 

CAA-TP-84-ll  ADF860017 

3  recipient’s  catalog  number 

4.  TITLE  (and  Subtttla) 

Partial  Substitution  and  Other  Modifications 
to  the  PARCOM  Model 

(Short  title:  PARCOM  Partial  Substitution) 

5.  Type  OF  REPORT  *  PERlOO  COVERED 

Final  Report 

May  84  -  Oct  84 

6  PERFORMING  org.  REPORT  number 

CAA-TP-84-11 

7.  AUTHORr*; 

Mr.  Walter  J .  Bauman 

8.  CONTRACT  OR  GRANT  NUMBEHf*) 

9  PERFORMING  ORGANIZATION  NAME  ANO  aooress 

US  Army  Concepts  Analysis  Agency 

8120  Woodmont  Avenue 

Bethesda,  Maryland  20814-2797 

10  PROGRAM  ELEMENT.  PROJECT,  TASK 
AREA  4  WORK  UNIT  NUMBERS 

11  CONTROLLING  OFFICE  NAME  ANO  AOORESS 

12.  REPORT  DATE 

November  1984 

13  NUMBER  OF  P  AGE- 

91 

U  MONITORING  AGENCY  NAME  3  AOORESy/I  dltiarant  from  Controlling  Qltica ) 

'S  SrCURIT-Y  CLASS  (31  IMm  r.porr 

UNCLASSIFIED 

IS*.  OECL  ASSI  FIC  A  TION  DOWNGRADING 

*CHEOULE  N/A 

16.  DISTRIBUTION  STATEMENT  (ot  thla  Raport) 

Aporoved  for  public  release.  Distribution  is  unlimited. 

17.  OISTRIBUTION  STATEMENT  (ot  f**  abatra c(  antarad  In  Block  20,  It  dlttararu  from  Raport) 

18  SUPPLEMENTARY  notes 

The  work  reported  was  performed  for: 

Office  of  the  Deputy  Chief  of  Staff  for  Logistics 

Department  of  the  Army 

19.  KEY  WOROS  (Contlnua  on  tarataa  mtd a  tl  nacaaaary  and  Identity  by  block  nutnbar) 

Aircraft,  spares,  Spare  parts,  PARCOM,  logistics,  stockage  requirements, 
logistics  management,  inventory  management,  helicopters,  readiness. 

20.  ABSTRACT  fOxrttau*  «  nm**  •tdN  ft  rrmcwoanry  aoW  tdonitly  by  block  numbor) 

The  basic  PARCOM  methodology  developed  in  the  Aircraft  Spares  Study  was 
expanded  to  include  a  partial -substitution  parts  replacement  policy  and 
distribution  of  stock  over  time.  As  with  basic  PARCOM,  extended  PARCOM 
relates  aviation  spare  parts  requirements  and  fleet  capability  to  flying 
hour  and  availability  objectives,  part  replacement  (substitution)  policies, 
and  stockage  deployment  schedule,  all  subject  to  optional  cost  constraints. 
Partial  substitution  was  defined  in  terms  of  a  oartition  of  part  types  into 

DO  \  JAM *73  M73  COITION  OF  »  NOV  6S  IS  OBSOLETE 


UNCLASSIFIED 


SECURITY  CLASSIFICATION  OF  THIS  PA  .E  ;  Do ta  Entatad) 


CAA- TP- 84- 1 1 


UNCLASSIFIED 

SECURITY  CLASSIFICATION  of  this  PAGEfWJi«n  Data  Entara d) 


Block  20  -  ABSTRACT  continued 

a  full-sub  set,  within  which  all  installed  serviceable  parts  on  NMCS 
aircraft  are  substitutable  for  unavailable  spares,  and  a  no-sub  set, 
within  which  no  installed  parts  are  substitutable  for  spares.  The 
extended  PARCOM  was  applied  in  several  illustrative  example  cases, 
showing  plausible  results  as  substitution  policy  was  varied. 


UNCLASSIFIED 


SECURITY  CLASSIFICATION  of  This  PACErWTitn  Data  Entarad) 


TECHNICAL  PAPER 
CAA-TP-84-11 


PARTIAL  SUBSTITUTION  AND  OTHER 
MODIFICATIONS  TO  THE  PARCOM  MODEL 

(SHORT  TITLE: 

PARCOM  PARTIAL  SUBSTITUTION) 


NOVEMBER  1984 


PREPARED  BY 

FORCE  SYSTEMS  DIRECTORATE 

US  ARMY  CONCEPTS  ANALYSIS  AGENCY 
8120  W00DM0NT  AVENUE 
BETHESDA,  MARYLAND  20814-2797 


Al**"*/ 

<5-'  C- 

PARTIAL  SUBSTITUTION  AND  OTHER 

STUDY 

!  CAA  - 

MODIFICATIONS  TO  THE  PARCOM  MODEL 

SUMMARY 

V  V 

(PARCOM  PARTIAL  SUBSTITUTION) 

CAA-TP-84-1 1 

THE  REASON  FOR  PERFORMING  THE  STUDY  was  that  the  two  models  recommended  by 
the  Aircraft  Spares  Study,  Overview  and  PARCOM,  could  treat  a  full- 
substitution  or  a  no-substitution  part  replacement  policy  but  lacked  the 
ability  to  represent  a  more  realistic  partial-substitution  replacement 
policy.  Of  the  two  models,  PARCOM  was  judged  to  be  the  better  candidate 
for  incorporation  of  a  partial-substitution  capability. 


THE  PRINCIPAL  FINDINGS  of  the  work  reported  herein  are  as  follows: 

(1)  The  basic  PARCOM  (Parts  Requirements  and  Cost  Model),  developed 
for  the  Aircraft  Spares  Study,  was  extended  to  include  the  effects  of 
partial-substitution  replacement  policies  and  deployment  of  initial  stocks 
over  time. 

(2)  The  resulting  extended  model  relates  spare  requirements  to  a 
flying  hour/aircraft  availability  objective,  parts  replacement  policy,  and 
stockage  deployment  schedule — al 1  subject  to  optional  cost  constraints. 
Example  applications  illustrated  the  plausibility  of  the  model  logic. 

(3)  The  extended  PARCOM  significantly  expands  the  range  of  application 
and  results  of  the  basic  PARCOM  methodology.  As  such,  its  implementation, 
in  place  of  basic  PARCOM,  is  warranted. 


THE  MAIN  ASSUMPTION  was  that  partial  substitution  can  be  usefully  defined 
in  terms  of  a  partition  of  part  types  into  a  full-substitution  part  set  and 
a  no-substitution  set. 


THE  PRINCIPAL  LIMITATION  was  that  definitions  of  partial  substitution  other 
than  the  assumed  definition  might  not  be  addressable  by  the  extended  PARCOM. 


THE  SCOPE  OF  THE  STUDY  addressed  the  relationship  of  spare  requirements  and 
fleet  capability  for  a  notional  Army  aviation  program  to  a  flying 
hour/avai lability  objective,  part  replacement  (substitution)  policy,  and 
stockage  deployment  schedule— all  subject  to  optional  cost  constraints. 

The  study  applied  the  subject  model  to  an  example,  using  four  part  types 
over  5  days,  and  to  an  all-up  case,  treating  an  AH-1S  scenario  involving 
334  part  types  over  120  days. 
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THE  STUDY  OBJECTIVES  were: 


(1)  To  evaluate  the  potential  for  extending  the  capability  of  the 
basic  PARCOM,  developed  in  the  Aircraft  Spares  Study,  to  include  partial 
substitution  and  other  desirable  features  lacking  in  the  basic  PARCOM. 

(2)  To  make  the  above  extensions  and  to  report  on  and  illustrate  the 
application  of  the  extended  PARCOM  and  methodology. 


THE  BASIC  APPROACH  was: 

(1)  To  assess  the  limitations  of  the  basic  PARCOM. 

(2)  To  select  features  and  capabilities,  to  include  partial  substi¬ 
tution,  for  incorporation  into  an  extended  PARCOM. 

(3)  To  develop  an  extended  PARCOM  incorporating  the  selected 
capabi 1 ities. 

(4)  To  report  on  the  nature  of  the  extended  PARCOM  methodology  and 
model  through  exposition  and  illustrative  example  applications. 


THE  STUDY  SPONSOR  was  the  Deputy  Chief  of  Staff  for  Logistics,  Headquarters, 
Department  of  the  Army. 


THE  STUDY  EFFORT  was  conducted  by  Mr.  Walter  J.  Bauman,  Force  Systems 
Directorate,  US  Army  Concepts  Analysis  Agency. 


COMMENTS  AND  QUESTIONS  may  be  directed  to  the  Director,  US  Army  Concepts 
Analysis  Agency,  ATTN:  CSCA-FS,  8120  Woodmont  Avenue,  Bethesda,  Maryland 
20814-2797. 
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PARTIAL  SUBSTITUTION  AND  OTHER  MODIFICATIONS  TO  THE  PARCOM  MODEL 
(Short  title:  PARCOM  Partial  Substitution) 


CHAPTER  1 
MODEL  DEVELOPMENT 


1-1.  BACKGROUND 

a.  Model  Origin.  The  US  Army  Concepts  Analysis  Agency  (CAA)  developed 
the  Parts  Requirements  and  Cost  Model  (PARCOM)  to  generate  cost  effective 
mixes  of  aircraft  spare  parts  and  to  assess  aircraft  fleet  performance  under 
specified  wartime  scenario  conditions.  Development  occurred  during  the 
course  of  the  Aircraft  Spare  Stockage  Methodology  (Aircraft  Spares)  Studyl 
conducted  by  CAA.  That  study,  and  PARCOM  development,  were  in  response  to 
interest  shown  by  the  Deputy  Chief  of  Staff  for  Logistics  (DCSLOG)  in  devel¬ 
oping  a  methodology  (or  methodologies)  relating  aircraft  spare  parts  stock- 
age  levels  to  combat  readiness  and  flying  hour  capability.  The  calculation 
of  spare  parts  requirements,  and  of  the  effects  of  budgeting  changes,  had 
been  a  slow  and  cumbersome  peacetime  oriented  exercise.  The  principal 
criterion  for  spares  stockage  had  been  the  achievement  of  acceptable  stock¬ 
out,  or  fill  rate,  levels.  To  more  realistically  predict  wartime  spare 
parts  requirements,  and  to  better  justify  budget  requests  for  spare  parts 
procurement,  the  Army  needed  a  more  responsive  methodology  based  on  wartime 
flying  hour  expectations  and  system  readiness/availability  requirements. 
PARCOM  was  developed  to  meet  that  need. 

b.  Current  Study  Purpose.  Results  reported  in  Aircraft  Spares  were 
sufficiently  encouraging  to  warrant  a  follow-on  study,  designated  the 
Overview/PARCOM  Turnkey  Project  (OPTP).  Included  in  the  objectives  of  OPTP 
were  the  following  actions  pertaining  to  PARCOM: 

(1)  Document  the  PARCOM,  as  developed  in  the  Aircraft  Spares  Study, 
and  deliver  it  to  the  US  Army  Aviation  Systems  Command  (USAVSCOM). 

(2)  Evaluate  and  report  on  the  potential  for  extending  the  capability 
of  PARCOM  to  include  partial-substitution  parts  replacement  policies  and 

any  other  features  deemed  desirable,  but  lacking  in  the  model  (PARCOM)  devel¬ 
oped  for  Aircraft  Spares. 

This  technical  paper  is  a  report  on  the  model  extension.  The  extended 
model  reported  herein  is  denoted  as  extended  PARCOM;  the  original  model,  as 
developed  in  the  Aircraft  Spares  Study,  is  denoted  herein  as  basic  PARCOM. 

1-2.  BASIC  PARCOM  PROBLEM  SPECIFICATION.  The  basic  PARCOM  was  designed  to 
generate  cost-effective  mixes  of  add-on  spare  parts  needed  to  permit  an 
aircraft  fleet  of  specified  type  to  achieve  specified  flying  program  and 
availability  goals  under  various  cost  constraints,  part  replacement  poli¬ 
cies,  and  aircraft  availability  objectives.  These  are  described  below  in 
summary  fashion.  Additional  detail  may  be  found  in  the  PARCOM  User's 
Guide. 2 
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a.  Cost  Constraints.  The  two  cost  constraint  modes  are: 

(1)  Unconstrained  Funds  -  where  unlimited  funds  for  procurement  of 
additional  required  parts  are  assumed  available. 

(2)  Constrained  Funds  -  where  a  cost  (funding)  limit  for  add-on  spares 
is  set.  If  unable  to  meet  the  flying  hour  and,  possibly,  availability 
objectives  with  the  limited  funds,  the  model  generates  a  "best"  solution 
mix  with  the  funds  available,  i.e.,  it  seeks  to  maximize  program  flying 
hours  achievable  within  the  funding  constraint. 

b.  Basic  Part  Replacement  Policies.  The  two  basic  part  replacement 
policies  are: 

(1)  Full  Substitution  -  where  a  failed  part  on  an  aircraft  may  be 
replaced  by  either  a  spare  (if  available)  or  by  a  serviceable  part  installed 
on  a  not-mission-capable  (NMC)  aircraft  (if  a  spare  is  not  available). 

(2)  No  Substitution  -  where  a  failed  part  on  an  aircraft  may  only  be 
replaced  by  a  spare  part. 

c.  Flying  Hour  Objective.  A  flying  hour  objective  is  a  requirement  for 
the  aircraft  fleet  to  achieve  a  specified  number  of  flying  hours  on  each 
day  of  the  scenario.  An  input  flying  hour  program  designates  the  daily 
goal.  A  basic  PARCOM  objective  is  to  generate  a  parts  mix  which  will 
achieve  the  specified  flying  program  at  least  cost. 

d.  Aircraft  Availability  Objective.  An  aircraft  availability  objective 
is  a  requirement  for  a  specific  minimum  aircraft  availability  on  each  day 
(different  days  may  have  different  minimum  required  availabilities).  In 
this  context,  aircraft  availability  =  1  -  NMCS,  where  NMCS  =  the  fraction 
of  surviving  aircraft  in  not-mission-capable-supply  status.  An  aircraft  is 
in  an  NMCS  status  if  it  is  nonoperational  because  spare  parts  are  needed 
but  are  not  available  to  restore  it  to  serviceability.  Specification  of 
availability  objectives  is  in  addition  to  the  flying  hour  objective. 
Specification  of  a  zero  availability  objective  is  equivalent  to  no  availa¬ 
bility  objective  at  all. 

1-3.  SUMMARY  OF  REQUIREMENTS  OUTPUT  FOR  BASIC  PARCOM.  The  following  are 
the  types  of  print  output  produced  by  basic  PARCOM  for  requirements 
problems.  Details  may  be  found  in  the  PARCOM  User's  Guide. 

a.  Unconstrained  Cost  Cases 

(1)  Total  Requirement.  Total  least-cost  parts  mix  and  costs  required 
to  achieve  the  case  objectives  (flying  program  and  availability)  given  a 
zero  initial  inventory. 

(2)  Residual  Requirement.  The  least-cost  add-on  parts  mix  (to  an 
input  initial  inventory)  and  costs  required  to  achieve  the  case  objectives. 
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(3)  Cumulative  Cost  by  Day.  For  each  day  N  (N=l,  2,  through  end 

of  war),  the  total  and  the  add-on  costs  of  the  full  parts  requirements  to 
meet  the  case  objectives  through  day  N  only,  i.e.,  it  is  the  cost  of  the 
requirement  for  a  truncated  scenario  of  N  days.  Parts  mix  is  not  shown. 

(4)  Cumulative  Requirement  by  Day.  For  selected  items,  for  each  day 
N,  the  cumulative  total  parts  requirement  needed  (in  the  full  parts  scenar¬ 
io)  to  meet  the  case  objectives  through  N  days.  A  zero  initial  inventory 
is  assumed  in  this  output. 

(5)  Daily  Aircraft  Available.  For  each  day  of  the  full  scenario,  the 
fraction  of  surviving  aircraft  which  are  not  NMCS,  assuming  that  the  start¬ 
ing  spare  inventory  is  set  equal  to  the  sum  of  the  computed  parts  require¬ 
ment  and  the  initial  inventory. 

(6)  Daily  Flying  Hours  per  Aircraft  per  Day.  For  each  day  of  the 
scenario,  the  average  achieved  flying  hours  per  available  aircraft  per  day 
assuming  the  computed  solution  parts  mix  is  stocked. 

b.  Constrained  Costs 

(1)  Total  Requirement.  Total  best  requirements  mix,  with  zero  initial 
inventory,  and  with  a  no-substitution  policy,  that  can  be  bought  with  a 
funding  limit  equal  to  the  sum  of  the  values  of  the  current  spares  inventory 
and  the  input  cost  limit.  The  objective  of  a  best  mix  is  to  maximize  flying 
hour  productivity  with  the  constrained  funds. 

(2)  Residual  Requirement.  Add-on  (to  input  initial  inventory)  require¬ 
ments  mix,  with  a  no-substitution  policy,  that  can  be  bought  with  a  funding 
limit  equal  to  the  input  cost  limit. 

(3)  Daily  Aircraft  Available.  For  each  day  of  the  full  scenario,  the 
fraction  of  surviving  aircraft  which  are  not  NMCS,  assuming  that  the  start¬ 
ing  spare  inventory  is  set  equal  to  the  sum  of  the  computed  parts  require¬ 
ment  and  the  initial  inventory. 

(4)  Daily  Flying  Hour  Fraction.  For  each  day  of  the  full  scenario, 
the  fraction  of  the  fleet  flying  program  which  can  be  achieved  assuming 
that  the  starting  spare  inventory  is  set  equal  to  the  sum  of  the  computed 
parts  requirement  and  the  initial  inventory. 

(5)  Daily  Flying  Hours  per  Aircraft  per  Day.  For  each  day  of  the 
scenario,  the  average  achieved  flying  hours  per  aircraft  per  day,  assuming 
the  computed  solution  parts  mix  is  stocked. 

1-4.  LIMITATIONS  OF  BASIC  PARCOM.  The  following  limitations  of  the  basic 
PARCOM  were  noted  as  a  suitable  base  for  future  model  extension  and/or  rede¬ 
sign. 


a.  No  Partial-substitution  Requirements.  A  partial-substitution  parts 
replacement  policy  can  be  conceptualized  as  one  in  which  some  (but  not 
necessarily  all)  part  types  installed  in  NMCS  aircraft  are  substitutable 
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for  spares,  i.e.,  such  a  part  type  installed  in  an  NMCS  aircraft  can,  if 
serviceable,  be  applied  to  replace  a  failed  part  (of  the  same  type)  in 
another  NMCS  aircraft  if  a  spare  is  unavailable.  The  basic  PARCOM  does  not 
consider  partial  substitution.  The  basic  PARCOM  requirement  algorithms 
process  only  a  full-substitution  replacement  policy  (all  parts  substitut¬ 
able)  or  a  no-substitution  replacement  policy  (no  parts  substitutable) 
depending  on  the  case  treated. 

(1)  Unconstrained  Cost.  The  basic  PARCOM  calculates  unconstrained 
cost  requirements  with  both  full  substitution  and  no  substitution. 

However,  using  a  common  scenario,  PARCOM-generated  solution  requirement 
costs  under  a  no-substitution  policy  are  much  larger  (for  nontrivial  cases) 
than  solution  costs  under  full  substitution.  It  may  be  useful,  therefore, 
to  examine  the  effects  of  partial-substitution  policies  with  corresponding 
intermediate  solution  costs. 

(2)  Constrained  Cost.  While  the  standard  unconstrained  cost  require¬ 
ments  solution  of  the  basic  PARCOM  can  treat  both  full  substitution  and  no 
substitution,  the  constrained  cost  algorithm  of  that  model  treats  only  a 
no-substitution  replacement  policy.  Extension  to  processing  of  partial 
substitution  would  enhance  model  capability. 

b.  No  Partial-substitution  Fleet  Capability  Assessment.  The  basic 
PARCOM  assesses  fleet  flying  capability  (resulting  aircraft  availability 
and  fraction  flying  program  achieved)  based  on  a  solution  inventory  being 
stocked  or  on  a  current  (input-specified)  parts  inventory.  Capability 
assessments  based  on  unconstrained  cost  solutions  treat  both  full  substitu¬ 
tion  and  no  substitution,  but  assessments  based  on  constrained  cost  solu¬ 
tions  or  on  a  current  inventory  treat  only  a  no-substitution  policy. 
Application  of  full  substitution  and  no  substitution  produce  upper  and 
lower  bounds,  respectively,  on  assessments  of  fleet  flying  hour  capability 
with  a  fixed  spare  inventory.  Modeling  of  partial  substitution  will  enable 
a  cause-and-effect  analysis  of  flying  hour  capabilities  between  those 
bounds . 


c.  No  Parts  Distributed  Over  Time.  The  basic  PARCOM,  in  both 
assessment  and  requirement  calculations,  assumes  that  all  initial  spare 
assets  are  "front-loaded,"  i.e.,  that  all  initial  spares  are  available  at 
retail  on  Day  1  of  the  scenario.  Since  a  spare  has  no  effect  unless  it  is 
needed,  this  is  equivalent  to  assuming  that  all  initial  assets  will  reach 
retail  before  they  are  required  (as  replacements).  An  efficient  stockage 
and  transportation  system  will  achieve  this.  However,  some  scenarios  will 
not  be  optimally  matched  to  the  time-phased  parts  deployments  reflected  in 
the  authorized  stockage  list  (ASL)/prescribed  load  list  (PLL)  of  deploying 
units  and  the  depot-retail  pipeline  lag  for  stocks  initially  at  depots. 

The  basic  PARCOM,  therefore,  may  yield  overly  optimistic  results.  Greater 
credibility  and  conformance  to  real-life  constraints  can  be  achieved  by 
enabling  PARCOM  to  process  time-phased  parts  deployments. 
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1-5.  PARCOM  EXTENSION 

a.  Need.  The  objective  of  the  Aircraft  Spares  Study  was  only  to  develop 
and  demonstrate  a  feasible  methodology.  The  follow-on  study  effort,  OPTP, 
was  to  document  the  basic  PARCOM  and  to  deliver  it  (as  well  as  Overview)  to 
the  US  Army  Aviation  Systems  Command  (USAVSCOM).  The  selected  models 
included  the  basic  PARCOM;  however,  OPTP  also  proposed  to  study  means  of 
extending  the  basic  PARCOM  to  include  partial  substitution  and  other  capa¬ 
bilities  found  feasible  and  useful.  The  final  OPTP  report  was  to  include 

an  evaluation  of  the  feasibility  of  implementing  these  model  extensions. 

This  technical  paper  presents  that  evaluation. 

b.  Aspects  Selected  for  Extension.  The  basic  PARCOM  limitations  noted 
in  paragraph  1-4  were  chosen  as  the  basis  for' extending  PARCOM  capability, 
i.e.,  the  extended  PARCOM  was  designed  to  have  the  capability  to  analyze: 

(1)  Effects  of  using  partial-substitution  part  replacement  policies 
in  requirements  calculations. 

(2)  Effects  of  using  partial-substitution  part  replacement  policies 
in  fleet  capability  assessment. 

(3)  Effects  of  using  input-specified  parts  deployments  over  time. 

(4)  Effects  of  cost  constraints  on  requirements  solutions  using  par¬ 
tial  substitution. 

In  the  above  context,  partial  substitution  includes  full  substitution  (full 
sub)  and  no  substitution  (no  sub)  as  special  cases. 

c.  Methodology.  The  approach  to  PARCOM  extension  included: 

(1)  Selection  of  the  capabilities  to  be  added.  These  are  noted  above. 

(2)  Construction  of  a  concept  for  partial  substitution  amenable  to 
processing  in  an  extended  PARCOM. 

(3)  Revision  or  replacement  of  program  code  in  basic  PARCOM  to  enable 
demonstration  of  concept  feasibility  for  the  extensions. 

(4)  Checking,  via  selected  manual  examples,  or  all-up  tests,  of  con¬ 
cept  feasibility  for  the  extensions. 

(5)  Provision-  of  an  undocumented  copy  of  the  FORTRAN  program  source 
code  for  the  extended  PARCOM. 
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1-6.  FUTURE  OUTPUT.  The  products  of  the  OPTP  do  not  include  delivery  and 
documentation  of  a  complete  extended  PARCOM  (only  the  basic  PARCOM  is 
delivered  and  documented).  However,  a  follow-on  effort  of  limited  scope 
will  provide: 

a.  Publication  of  revisions  to  the  (basic)  PARCOM  User's  Guide  and 
Functional  Description. 

b.  Documentation  of  the  program  source  code  for  the  extended  PARCOM. 
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CHAPTER  2 

REQUIREMENTS  DETERMINATION  WITH  PARTIAL  SUBSTITUTION 


2-1.  CONCEPT  FORMULATION 


a.  Definition.  In  the  extended  PARCOM,  a  partial-substitution  parts 
replacement  policy  is  defined  by  partitioning  all  part  types  into  a  full-sub 
set  and  a  no-sub  set.  A  part  type  is  in  only  one  set  and  remains  in  that 
set  throughout  the  scenario.  These  sets  are  defined  as  follows: 

(1)  All  parts  in  the  full-sub  set  operate  with  a  full-substitution 
replacement  policy  relative  to  aircraft  which  are  NMCS  due  to  lack  of  a 
part  from  that  set.  That  is,  a  failed  full-sub  part  on  an  aircraft  may  be 
replaced  either  by  a  spare  (if  available)  or  by  a  serviceable  part  installed 
on  an  NMCS  aircraft  which  is  awaiting  a  full-sub  part,  if  a  spare  is  not 
available.  However,  no  failed  full-sub  part  can  be  replaced  by  any  part 
installed  on  an  NMCS  aircraft  awaiting  a  no  sub-part. 

(2)  Parts  in  the  no-sub  set  operate  with  a  no-substitution  replacement 
policy.  That  is,  a  failed  no-sub  part  on  an  aircraft  may  only  be  replaced 
by  a  spare  part.  An  NMCS  aircraft  lacking  a  no-sub  part  may  neither  receive 
a  serviceable  part  from  another  NMCS  aircraft,  nor  may  it  provide  a  service¬ 
able  part  to  (fill  a  "hole"  in)  any  other  NMCS  aircraft. 

b.  Implications.  The  full-substitution  and  no-substitution  policies  of 
the  basic  PARCOM  are  special  cases  of  partial  substitution  in  which  all 
parts  are  either  in  the  full-sub  set  or  in  the  no-sub  set.  The  analytic 
usefulness  of  the  above  definition  arises  from  the  consequence  that  any 
NMCS  aircraft  will  either  be  awaiting  exactly  one  no-sub  part  or  at  least 
one  full-sub  part  but  will  never  be  awaiting  a  mixture  of  full-sub  and 
no-sub  parts. 


c.  Selection  of  Full-sub  Parts.  Before  requirements  processing  begins 
in  the  extended  PARCOM,  a  full-sub  and  a  no-sub  part  set,  applicable  over 
all  scenario  days,  must  be  defined.  One  option  allows  the  user  to  specify 
those  part  types  which  comprise  the  full-sub  set.  By  default,  all  nonspeci- 
fied  parts  are  presumed  to  be  in  the  no-sub  set.  However,  the  model  has 
another  option,  allowing  the  user  to  specify  three  screening  limits--Ll, 

L2,  and  L3.  With  these  limits  the  model  selects  a  part  type  for  the  full- 
sub  set  if  at  least  one  of  the  following  apply: 


The  (input)  depot  repair  cycle  time  for  the  part  exceeds  LI  days 
and  the  not  repairable  this  station  (NRTS)  fraction  exceeds  zero. 


•  The  (input)  NRTS  fraction  for  the  part  exceeds  L2. 


•  The  (input)  retail  repair  time  for  the  part  exceeds  L3. 
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The  model,  under  this  option,  examines  all  part  types  and  assigns  those 
that  satisfy  the  screening  limits  to  the  full-sub  set.  All  other  part  types 
are  assigned  to  the  no-sub  set.  The  above  screening  criteria  were  chosen 
because  it  appeared  plausible  that  full  substitution  would  be  most  likely 
practiced  on  parts  which  took  a  long  time  to  cycle  back  through  the  repair 
pipelines;  however,  other  criteria  could  also  be  selected. 

2-2.  EXAMPLE  TEST.  The  application  of  the  partial-substitution  concept  is 
demonstrated  below  via  illustrative  examples.  For  review  and  comparison 
purposes,  the  effects  of  standard  (basic  PARCOM)  full-substitution  and 
no-substitution  policies  are  also  shown,  followed  by  a  summary  of  partial- 
substitution  logic  and  effect  calculations. 

a.  Problem  Framework 

(1)  A  data  base  containing  four  part  types  was  applied  in  a  5-day 
scenario.  Table  2-1  shows  input  parts  data  for  the  example.  QPA  denotes 
the  quantity  per  application,  i.e.,  the  number  of  installed  parts  per  oper¬ 
ational  aircraft.  OST  denotes  the  one-way,  order  and  ship  time  between 
depot  and  retail.  Overall  repair  cycle  equals  the  sum  of  the  depot  repair 
time  and  2xOST  for  depot  repairable  items  and  equals  the  retail  repair  time 
for  retail  repairable  items.  Essentially,  it  is  the  (pipeline)  time  between 
removal  of  a  failed  part  and  its  return  to  the  retail  pool  of  serviceable 
spares.  Table  2-2  shows  scenario  input  data  for  the  example  problem.  The 
two  columns  on  the  right  define  the  flying  hour  and  availability  objectives 
for  the  problem.  The  cumulative  aircraft  deployments  and  losses  are  also 
input.  Cumulative  aircraft  surviving  is  calculated  from  them. 


Table  2-1.  Example  Problem  -  Parts  Data 


PART  1 

PART  L 

PART  > 

PART  A 

•  PARIS  CHARACTERISTICS 

-  FAILURE  RATES  (PER  FLY  HR) 

.08 

.02 

.06 

.02 

-  QPA 

1 

1 

1 

1 

-  UNIT  COST  ($) 

400 

50 

40 

30 

-  IN  IT  (INITIAL  STOCK) 

250 

10 

260 

30 

•  PARTS  REPAIR  CYCLE  DATA 

-  OST  (DAYS) 

1 

0 

1 

0 

-  RETAIL  REPAIR  TIME  (DAYS) 

0 

3 

0 

2 

-  DEPOT  REPAIR  TIME  (DAYS) 

1 

0 

2 

0 

-  RETAIL  CONDEMN  Z 

0 

0 

0 

0 

-  DEPOT  CONDEMN  Z 

0 

0 

0 

0 

-  NRTS  Z 

100 

0 

100 

0 

(OVERALL  REPAIR  CYCLE) 

(3  DAYS) 

(3  DAYS) 

(4  DAYS) 

(2  DAYS) 
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Table  2-2.  Example  Problem  -  Scenario  Data 


CUM 

CUM 

CUM 

FLY  I  NO 

MIN 

ACFT 

ACFT 

ACFT 

HR  POM 

ACFT 

Ml 

DEPL 

LUST 

SURV 

iEHLL 

MAIL. 

1 

150 

0 

150 

500 

•  10 

2 

200 

0 

200 

1,000 

•  09 

3 

200 

0 

200 

1,000 

•  09 

4 

200 

0 

200 

1,500 

•  09 

5 

200 

0 

200 

1,500 

.09 

MAX  FLY 

HRS/ACFT/UAY  - 

10 

(2)  Given  the  problem  input  data,  Table  2-3  shows  necessary  prepro¬ 
cessing  used  in  all  algorithm  calculations.  The  allowable  NMCS  aircraft 
for  a  day  is  the  maximum  number  of  surviving  aircraft  which  can  be  NMCS  on 
that  day  while  still  allowing  fleet  accomplishment  of  the  case  objective 
(flying  hour  and  availability)  for  that  day.  FHP  denotes  the  specified 
flying  hour  program  for  each  day. 


Table  2-3.  Calculation  of  Allowable  NMCS  Aircraft 


UAY 

#i 

MIN  ACFT  RUR 

BY  FLY INb  HR 
PROORAM 

n 

MIN  ACFT  ROR 

BY  AVAILABILITY 
CONSTRAINT 

OVERALL 

MIN  ACFT 
REUUlRtl) 

ALLOWABLE 
NMCS  ALFT 

FHP/MFHAD* 

SURV  AC  X  MIN  AVAIL 

MAX  (#1,  #2) 

SURV  AC  -Hi 

1 

500/10*50 

150x. 10*15 

50 

150-50-100 

2 

100 

18 

100 

100 

3 

100 

18 

100 

100 

4 

150 

18 

150 

50 

5 

150 

18 

150 

50 

*  MAXIMUM  FLYINU  HOURS  PER  AIRCRAFT  PER  UAY 
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b.  Unconstrained  Cost  Requirements  Under  Full  Substitution.  Tables  2-4 
through  2-7  illustrate  the  basic  PARCOM  logic  for  example  data  under  a  full- 
substitution  policy.  Formulas  used  in  calculations  are  shown  in  the  table 
headings.  The  allowable  stockout  for  a  part  on  a  day  is  just  the  maximum 
number  of  backorders  (unfilled  demands)  for  the  part  which  will  still  allow 
accomplishment  of  the  case  objectives  on  that  day.  The  day  requirement  is 
the  minimum  add-on  stock  required  to  achieve  the  objectives  on  a  given  day. 
The  largest  of  all  the  day  requirements  for  a  part  (circled  in  the  table) 
is  the  overall  (minimum)  requirement  for  the  part.  All  stock  is  assumed 
front-loaded,  i.e.,  available  at  retail  when  needed. 


Table  2-4.  Unconstrained  Cost  Residual  Requirement  with  Full  Substitution 

-  Part  1  (initial  inventory  =  250) 


DAY 

#1 

CUMULATIVE 

FAILURES 

n 

CUM  RET 
REPAIRS 

#3 

CUMULATIVE 

NET  DEMAND 

#4 

ALLOWABLE 

STOCKOUTS 

DAY 

RUMTS 

(FAIL  RT  X  FHP  X 

QPA) 

MAX  [#l-(#2+INlT)l 

NMCS  AC  X  QPA 

MAX 

(#3-#4) 

OR  (U) 

• 

OR 

(0) 

1 

•08x500-40 

0 

40-0-250  OR  (T] 

100  x  1  -  100 

o- 

100  UK  [o] 

2 

40+- 08x1000= 

■120  0 

0 

100 

0 

3 

200 

0 

0 

100 

0 

4 

320 

M0 

320-290-30 

50 

0 

5 

440 

120 

70 

50 

© 

PART  1  OVERALL  RQMT  -  LARGEST  DAY 

RQMT  -  20 

Table  2-5.  Unconstrained  Cost  Residual  Requirement  with  Full  Substitution 

-  Part  2  (initial  inventory  =  10) 


#i 

n 

#  3 

#4 

CUMULATIVE 

CUM  RET 

CUMULATIVE 

ALLOWABLE 

UAY 

DAY 

FAILURES 

REPAIRS 

NET  DEMAND 

RQMT 

(FAIL  RT  X  FHP  X  QPA) 

MAX  [#l-(#2+INlT)l 

NMCS  AC  X  QPA 

MAX ( #^-#4 ) 

OR  (0) 

OK  (0) 

1 

•02x500-10 

0 

10-0-10  UK  QT) 

100x1*100 

0-100  UR  Qj] 

2 

10+. 02x1000-30 

0 

20 

100 

0 

3 

50 

0 

40 

100 

0 

4 

80 

10 

80-10-10*60 

50 

60-50*10 

5 

110 

30 

70 

50 

70-50^ 

PART  2  UVERALL  RQMT  -  LARbEST  UAY 

RQMT  -  20 
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Table  2-6.  Unconstrained  Cost  Residual  Requirement  with  Full  Substitution 

-  Part  3  (initial  inventory  =  260) 


#1 

n 

#3 

#4 

CUMULATIVE 

CUM  KET 

CUMULATIVE 

ALLOWABLE 

UAY 

DAY 

FAILURES 

REPAIRS 

NET  UEMANU 

STOCKOUTS 

RQMT 

(FAIL  KT  X  FHP  X  QPA) 

MAX  [#1“(#2+IN IT) I 

HMCS  AC  X  QPA 

MAX(#3-#4) 

UR  (0) 

UR  (0) 

1 

30 

0 

0 

100 

0 

2 

90 

0 

0 

100 

0 

3 

150 

0 

0 

100 

0 

4 

^40 

0 

0 

50 

0 

5 

330 

30 

40 

50 

® 

PART 

3  UVERALL  RQMT  -  0 

Table  2- 

•7.  Unconstrained  Cost  Residual  Requirement  with 
-  Part  4  (initial  inventory  =  30) 

Full 

Substitution 

DAY 

#i 

CUMULATIVE 

FAILURES 

n 

CUM  RET 
REPAIRS 

#3 

CUMULATIVE 

NET  DEMAND 

#4 

ALLUWAbLE 

STOCKOUTS 

DAY 

RQMT 

(FAIL  RT  X  FHP  X  QPA) 

MAX 

[#l-(#2+lNIT)l 
UR  (0) 

NMCS  AC 

X  UPA 

MAXU3-#4) 

OR  (U) 

1 

10 

0 

0 

100 

0 

2 

30 

0 

0 

100 

0 

3 

50 

10 

10 

100 

0 

4 

80 

30 

20 

50 

0 

5 

no 

50 

30 

50 

® 

PART  4  OVERALL  RQMT  -  0 
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c.  Unconstrained  Cost  Requirements  Under  No  Substitution.  Tables  2-8 
through  2-11  illustrate  the  basic  PARCOM  logic  for  the  example  under  a  no¬ 
substitution  policy.  In  this  case,  requirements  must  be  calculated  in  order 
of  decreasing  part  unit  cost  (i.e.,  most  expensive  parts  first).  For  a 
no-substitution  policy,  the  total  allowed  stockout  consists  of  the  summed 
stockouts  over  all  parts  treated.  However,  since  requirements  are  calcu¬ 
lated  (purchased)  sequentially,  each  successive  calculation  uses  an  "unallo¬ 
cated  allowable  stockout"  equal  to  the  original  (Table  2-3)  allowable  stock¬ 
out  reduced  by  the  sum  total  of  allocated  stockouts  reflected  in  purchases 
of  parts  already  processed.  As  before,  the  overall  part  requirement 
(circled)  is  calculated  as  the  largest  of  the  day  requirements. 

d.  Summary  of  Full-sub  and  No-sub  Results.  Table  2-12  summarizes  the 
results  thus  far.  The  full-sub  requirement  cost  is  the  cheapest  over  all 
part  replacement  policies  while  the  no-sub  cost  is  the  most  expensive.  All 
partial-sub  requirements  costs  must  be  between  these  values.  This  will  be 
illustrated  subsequently. 


Table  2-8.  Unconstrained  Cost  Residual  Requirement  with  No  Substitution 

-  Part  1  (initial  inventory  =  250) 


CALCULATE  FOR  MOST  EXPENSIVE  PART  (PART  1) 


DAY 

1 

2 


n 

n 

CUM  NET 

UEMANU 

UNALLOCATEU 

PART  1 

ALLOWABLE 

(1NIT-250) 

STUCKUUT 

UAY  RQMT 

(FROM  'FULL  SUB') 

(-allowed  nmcs  ac) 

MAX(#1  -  #2) 
UR  (0) 

0 

100 

0  -  100  ok[£ 

0 

100 

0 

0 

30 

70 


100 

50 

50 


0 

0 

© 


PART  1  RQMT  ■  LARGEST  UAY  RUMT  -  20 
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Table  2-9.  Unconstrained  Cost  Residual  Requirement  with  No  Substitution 

-  Part  2  (initial  inventory  =  10) 

•  CALCULATE  RQMT  FUR  NEXT  MUST  EXPENSIVE  PART  (PART  2) 


• 

ASSUME  PREVIOUS  (PART 

1)  RQMT  ‘'BOUGHT* *  SU  THAT  NEW 

1  NIT  -  OLD  IN  IT  (250) 

♦  RQMT  (20) 

-  270 

#5 

#4 

#5 

CUM  NET 

CUM  NET 

DEMAND 

DEMAND 

UNALLOCATED 

PART  1 

PART  2 

ALLOWABLE 

JAY 

(INIT-270) 

( IN! T* 10 ) 

STOCKOUT 

DAY  RQMT 

#1-20 

(FROM  'FULL  SUB') 

#2-#3 

MAX( #4  -  #5) 

UR  (0) 

UR  (0) 

UR  (U) 

1 

0 

0 

100-0-100 

0 

2 

0 

20 

100-0-100 

0 

3 

0 

40 

100-0-100 

0 

A 

30-20*10 

60 

50-10-40 

60-40-20 

5 

70-20*50 

70 

50-50-0 

7U-Q0 

PART  2  RQMT  -  LARGEST  DAY  RUMT  -  70 


Table  2-10.  Unconstrained  Cost  Residual  Requirement  with  No  Substitution 

-  Part  3  (initial  inventory  =  260) 

•  CALCULATE  RQMT  FOR  NEXT  MOST  EXPENSIVE  PART  (PART  3) 

•  ASSUME  PREVIOUS  (PARTS  1  &  2)  RQMT S  'BOUbriT*  SU  THAT  NEW  PART  i 
1N1T  -  270 ,  NEW  PART  2  1NIT  -  80 


#3 

CUM  NET 
DEMAND 
PART  1 

Ml  ( 1N1T-270) 
#1-20 
OR  (0) 


#6 

CUM  NET 
DEMAND 
PART  2 
UNIT-80) 

#4-70 
UR  (0) 


#7  #8 

CUM  NET 

DEMAND  UNALLUCATED 

PART  3  ALLOWABLE 

( lNlTn2bO)  STUCKUUT 

(FROM  'FULL  SUB')  #2-#3-#6 

OR  (0) 


DAY  RUMT 

MAX(#7  -  #8) 
UR  (0) 


0 

0 

0 

10 

50 


0 

0 

0 

0 

40 


100 

100 

100 

40 

0 


0 

0 

0 

0 

(0) 


PART  3  RQMT  -  LARGEST  DAY  RQMT  *  40 
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Table  2-11.  Unconstrained  Cost  Residual  Requirement  with  No  Substitution 

-  Part  4  (initial  inventory  =  30) 

•  CALCULATE  RQMT  FUR  NEXT  MUST  EXPENSIVE  PART  (PAKT  4) 


•  ASSUME  PREVIOUS 

(PARTS  1,  2  &  3) 

RQMT S  ‘'BOUGHT" 

SO  THAT 

NEW  PART 

INIT 

■  270,  PART 

2  INIT  ■  80,  PART  3  INIT  ■  300 

#3 

#6 

#9 

#10 

#n 

CUM  NET 

CUM  NET 

CUM  NET 

CUM  NET 

UEMANU 

DEMAND 

UEMANU 

UEMANU 

UNALLOCATED 

PART  1 

PART  2 

PART  3  * 

PART  4 

ALLOWABLE 

m 

(INIT-270) 

UNIT-80) 

( 1N1T-500) 

(IN1T-30) 

STUCKOUT 

.  UA'C 

RQMT 

#1-20 

#4-70 

#7-40 

(frum  full  sub) 

#2-#3-#6-#9 

MAX ( #10 

-  #11) 

OK  (0) 

UR  (0) 

OR  (U) 

UR  (0) 

OR 

(U) 

i 

0 

0 

0 

0 

100 

0 

2 

0 

0 

0 

0 

100 

U 

3 

0 

0 

0 

10 

100 

0 

4 

10 

0 

0 

20 

40 

0 

5 

50 

0 

0 

30 

0 

PAKT  4  RQMT  -  LARbEST  UAY  RQMT  ■  30 


Table  2-12.  Summary  of  Unconstrained  Cost  Residual  Requirements 


'FULL  SUB' 
ADD-ON  RQMT 

'NU  SUB' 

ADD-ON  RQMT 

PART  1 

20 

20 

PART  2 

20 

70 

PART  3 

0 

40 

PART  4 

0 

30 

TOTAL  COST 

9,000 

14,000 

*  FROM  CUM  NET 

DEMAN U  COLUMN  OF 

TABLES  2-4  THRU  2-7 
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e.  Partial-substitution  Algorithm  Logic.  The  order  of  partial- 
substitution  algorithm  operations  is  described  below.  They  will  be  illus¬ 
trated  in  succeeding  paragraphs. 

(1)  Partition  all  part  types  into  a  full-sub  set  and  a  no-sub  set  as 
defined  in  paragraph  2-la. 

(2)  Calculate  the  allowable  NMCS  aircraft  for  each  day. 

(3)  For  each  day: 

(a)  Generate  all  possible  nonnegative  integer  combinations  (AF,  AN) 
(for  full-sub  and  no-sub,  respectively)  such  that  AF  +  AN  =  allowable  NMCS 
aircraft  for  that  day. 

(b)  For  each  integer  combination  (AF,  AN),  compute  a  basic  PARCOM 
full-sub  solution  over  only  the  full-sub  part  set  for  the  scenario  through 
that  day,  assuming  AF  allowed  NMCS  aircraft  (awaiting  full-sub  parts)  for 
that  day.  Also  compute  a  basic  PARCOM  no-sub  solution  over  only  the  no-sub 
part  set  for  the  scenario  through  that  day,  assuming  AN  allowed  NMCS  air- 
craft  (awaiting  no-sub  parts)  for  that  day.  Calculate  the  total  solution 
cost  for  the  combination  (AF,  AN)  as  the  sum  of  the  costs  for  the  full-sub 
and  no-sub  solutions  described  above. 

(c)  Select  the  solution  for  the  combination  (AF,  AN)  yielding  the 
mi nimum  total  solution  cost.  This  solution  consists  of  the  requirements 
for  each  part  on  that  day  and  is  called  the  day  requirement.  The  combi¬ 
nation  (AF,  AN)  used  in  the  selected  solution  then  becomes  the  allowed 
stockouts  used  during  cumulative  (from  Day  1)  calculations  on  all  suc¬ 
ceeding  scenario  days. 

(4)  After  all  days  are  processed,  select  the  largest  (over  all 
scenario  days)  of  the  computed  day  requirements  for  each  part  as  the  over¬ 
all  requirement.  The  logic  for  computing  a  basic  PARCOM  solution  is 
described  in  the  PARCOM  Functional  Description. 3  The  above  algorithm  tends 
toward  a  least  cost  solution  mix  (assuming  unconstrained  funds)  for  the 
partial-substitution  replacement  policy  defined  by  the  full-sub/no-sub 
partition  of  the  part  data  base. 

f.  Unconstrained  Cost  Requirements  Under  Partial  Substitution  -  Example 
Conditions 

(1)  Simplifying  Assumptions.  The  full  set  of  algorithmic  calculations 
was  too  complex  to  represent,  so  for  this  example  only,  the  following  simpli¬ 
fying  assumptions  were  made: 

(a)  To  simplify  computation,  the  combinations  (AF,  AN)  chosen  were 
multiples  of  10. 

(b)  Since,  in  this  example.  Day  5  drives  (has  the  largest  day 
requirements  for)  the  solution,  the  only  calculations  shown  are  for  Day  5. 
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(2)  Definition  of  Policy.  Part  1  and  Part  2  (from  Table  2-1)  were 
selected  for  the  full-sub  part  set  and  Part  3  and  Part  4  for  the  no-sub 
part  set. 

(3)  Calculations  for  Example  1.  Table  2-13  shows  the  algorithm  calcu¬ 
lations  for  partial-sub  for  Day  5.  Note  that: 

(a)  The  calculation  of  daily  allowable  NMCS  aircraft  used  in  full 
sub  and  no  sub  also  applies  here. 

(b)  For  AF  =  0  on  day  5,  the  full-sub  solution  for  the  full-sub 
part  set  is  just  the  largest  daily  cumulative  net  demand  for  each  full-sub 
part.  From  Table  2-4,  this  is  70  for  Part  1.  From  Table  2-5,  this  is  70 
for  Part  2.  These  are  also  the  requirements  for  these  parts  under  an  "NMCS 
=  0"  policy  in  basic  PARCOM. 

(c)  For  AF  greater  than  0,  to  obtain  a  full-sub  solution  based  on 
AF  allowed  NMCS  aircraft  for  the  full-sub  parts  set,  AF  x  QPA  =  AF  (since 
QPA  =  1  in  this  example)  units  are  subtracted  from  each  part  requirement 
in  the  "AF  =  0"  solution.  This  is  done  because  each  reduction  of  stock  by 
QPA  units  creates  QPA  backorders  which,  in  turn,  correspond  to  one  NMCS 
aircraft. 


Table  2-13.  Unconstrained  Cost  Residual  Requirements  Calculations 
for  Day  5  with  Partial  Substitution  -  Example  1 

ALLOWABLE  NMCS  ACFT  -  50 
Af  -  ALLOWABLE  NMCS  ACFT  FKOM  'FULL  SUB'  SET 
AN  -  ALLOWABLE  NMCS  ACFT  FKOM  'NO  SOB'  SET 


'FULL  SOB' 

'NU  SUB' 

SOLUTION 

SULUTIUN 

COMBINED 

COMBINED 

PT  1/PT  2 

PT  3/PT  A 

SOLUTION 

SOLUTION  # 

At 

($A00/$50) 

COST 

A U 

($A0/$30) 

COST 

COST 

1 

0 

70/70 

$31,500 

50 

0/20 

$600 

$32,100 

2 

10 

60/60 

27,000 

40 

0/30 

900 

27,900 

3 

20 

50/50 

22,500 

30 

10/30 

1,300 

23,800 

4 

30 

AO/AO 

18,000 

20 

20/30 

1,700 

19,700 

5 

40 

50/30 

13,500 

10 

30/30 

2,100 

13,bU0 

6 

50 

20/20 

9,000 

0 

40/30 

2,500 

111.5001 

PT  1 

PT  2 

PT  3  PT  4 

MIN  COST  SUL  -  20 

20 

40  30 

(ASSUMIN6 

DAY  5 

HAS  THE  MAX 

RGMT) 
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(d)  For  AN  =  0  on  Day  5,  the  no-sub  solution  for  the  no-sub  part 
set  is  just  the  largest  daily  cumulative  net  demand  for  each  no-sub  part. 
From  Tables  2-6  and  2-7,  these  are  40  for  Part  3  and  Part  4.  These  are 
also  the  requirements  for  these  parts  under  an  "NMCS  =  0"  policy  in  basic 
PAR COM. 


(e)  For  AN  greater  than  0,  to  obtain  a  no-sub  solution  based  on  AN 
allowed  NMCS  aircraft  for  the  no-sub  part  set,  AN  units  are  subtracted  from 
the  stock  requirement  for  the  most  expensive  item(s)  in  the  "AN  =  0"  solu¬ 
tion.  Each  reduction  of  stock  by  one  unit  creates  a  backorder  and  corre¬ 
sponds  to  one  NMCS  aircraft. 

(f)  The  minimum  combined  (total)  solution  cost  ($11,500)  is  marked 
in  Table  2-13.  The  combined  parts  requirement  for  the  associated  (AF,  AN) 
combination  is  the  day  requirement  for  Day  5.  If  (as  assumed  in  this  exam¬ 
ple)  Day  5  has  the  largest  day  requirement,  then  that  day  requirement  is 
also  the  overall  minimum  cost  solution  for  our  partial-substitution  Example 
1.  From  Table  2-12,  the  resulting  solution  cost  ($11,500)  is  between  the 
full-sub  solution  cost  ($9,000)  and  the  no-sub  solution  cost  ($14,000). 

(4)  Calculations  for  Example  2.  The  conditions  of  the  previous  exam¬ 
ple  are  altered  slightly  in  order  to  illustrate  another  case.  Example 
2  is  identical  to  the  previous  example  except  for  the  part  unit  costs. 

Table  2-14  shows  the  new  (Example  2)  part  costs  alongside  their  old  (Exam¬ 
ple  1)  values.  The  following  observations  apply: 


Table  2-14.  Part  Unit  Cost  Data  for  Example  2 


PREVIOUS  EXAMPLE  #1  WITH  NEW  PART  OUSTS  AS  FULLUWS: 


PART  1  PART  2  PART  5  PART  4 


NEW  COST  $40  $  50 

OLD  COST  $  400  $  50 


$  400  $  iO 

$40  $  iO 


(a)  Table  2-15  shows  the  partial-sub  solution  calculations  for  Exam¬ 
ple  2.  Note  that  the  Example  1  full-sub  and  no-sub  solutions  for  (AF,  AN) 
combinations  also  apply  to  Example  2.  This  is  true  because: 

1.  Alteration  of  part  unit  cost  data  never  changes  a  full-sub 

solution. 


2.  The  no-sub  solution  with  new  part  costs  does  not  change  if  the 
cost  ordering  of  no-sub  parts  is  unchanged  with  the  new  cost  data  (since 
the  most  expensive  items  remain  the  same  then).  In  the  given  examples. 

Part  3  is  always  more  expensive  than  Part  4. 


2-11 


CAA-TP-84-11 


(b)  As  in  Table  2-13,  the  minimum  combined  (total)  solution  cost 
($6,300)  is  marked  in  Table  2-15.  As  before,  the  combined  solution  asso¬ 
ciated  with  that  minimum  cost  is  the  day  requirement  for  Day  5  and,  by  our 
assumptions,  is  also  the  overall  minimum  cost  solution  for  Example  2.  Note 
that,  all  else  being  equal,  the  relative  unit  costs  of  parts  drives  the 
partial-sub  solution. 


Table  2-15.  Unconstrained  Cost  Residual  Requirements  Calculations  for 
Day  5  with  Partial  Substitution  -  Example  2 


ALLOWABLE  NMCS  ACFT  -  50 
Ap  ■  ALLOWABLE  NMCS  ACFT  FKUM  'FULL  SUB'  SET 


An  -  ALLUWABLE 

NMCS 

ACFT  FKUM 

'NO  SUB' 

SET 

'FULL  SUB' 

'NO  SUB' 

SOLUTION 

SOLUTION 

COMBINED 

CUMB1NEU 

PT  1/PT  2 

PT  3/PT  4 

SOLUTION 

SOLUTION  i 

At 

im/mi 

COST 

A* 

($400/$30) 

COST 

COST 

1 

0 

70/70 

*6,300 

50 

0/20 

$600 

$6,900 

2 

10 

60/60 

5,400 

40 

0/30 

900 

16.3001 

3 

20 

50/50 

4,500 

30 

10/30 

4,900 

9,400 

4 

30 

40/40 

3,600 

20 

20/30 

6,900 

12,500 

5 

40 

30/30 

2,700 

10 

30/30 

12,900 

15,600 

6 

50 

20/20 

1,800 

0 

40/30 

16,900 

18,700 

PT 

1 

PT  2  PT  3 

PT  4 

MIN  COST 

SOL  -  60 

60  0 

30 

(ASSUMING 

DAY 

5  HAS  THE 

MAX  RQMT) 

2-3.  APPLICATION  TO  FULL-SCALE  DATA  BASE 

a.  Background.  The  previous  section  treats  relatively  simple  stylized 
examples  of  little  practical  interest.  In  this  section,  requirement 
results  are  presented  for  extended  PARCOM  applied  to  the  AH-1S  helicopter 
parts  data  base  and  scenario  used  in  the  CAA  study  reports  for  the  Aircraft 
Spare  Stockage  Methodology  Study  and  the  MAX  FLY  Study. 4  The  extended 
PARCOM  case  will  be  denoted  as  the  MAX  FLY  example.  The  associated  parts 
data  base  has  334  different  part  types  tagged  as  essential  to  aircraft 
operation.  That  data  base  was  applied  in  a  120-day  European  scenario. 
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b.  Partial  Substitution  Policy.  A  partial-substitution  policy  in 
extended  PARCOM  is  defined  in  terms  of  the  part  types  (in  the  parts  data 
base)  which  comprise  the  full-sub  parts  set  (see  para  2-1).  The  full-sub 
parts  of  the  MAX  FLY  example  were  defined  as  all  those  part  types  with 
either  a  not  repairable  this  station  (NRTS)  rate  exceeding  50  percent  or 
with  a  retail  repair  time  (as  specified  in  the  data  base)  of  at  least  30 
days.  The  resulting  full-sub  part  set  employed  by  extended  PARCOM  contains 
102  part  types.  All  other  part  types  are  in  the  no-sub  parts  set.  Again, 

a  full-substitution  policy  is  just  a  special  case  of  partial  substitution 
in  which  al 1  part  types  are  in  the  full-sub  set.  A  no-substitution  policy 
is  a  special  case  in  which  no  part  type  is  in  the  full-sub  set. 

c.  Comparative  Results.  Table  2-16  summarizes  the  comparative  residual 
(add-on  to  current  inventory)  requirement  results,  by  replacement  policy, 
for  the  MAX  FLY  data  base  and  scenario.  The  partial-substitution  policy 
represented  therein  is  the  one  defined  above.  The  relatively  small  dif¬ 
ference  between  the  partial-substitution  and  full-substitution  requirement 
costs  is  primarily  due  to  the  dominance  of  the  requirement  costs  for  a 
single  part  type,  the  stability  control  amplifier,  in  all  three  policy 
cases.  The  full-substitution  cost  and  the  no-substitution  cost  are  lower 
and  upper  bounds,  respectively,  on  all  partial-substitution  policies.  The 
partial-substitution  policy  applied  here  is  just  one  of  many  potential 
policies.  If  new  partial-substitution  policies  are  defined  by  transferring 
some  no-sub  part  types  to  the  full-sub  part  set,  then  the  associated  require 
ments  costs  will  decrease  and  will  approach  the  full-substitution  policy 
cost.  Conversely,  if  policies  are  defined  by  transferring  some  full-sub 
part  types  into  the  no-sub  set,  then  the  associated  requirements  costs  will 
increase  and  approach  the  no-substitution  policy  cost.  The  size  of  the 
change  in  requirements  cost  associated  with  an  altered  full-sub  part  set 
(and  hence  a  different  partial-substitution  policy)  depends  on  which  parts 
are  added  to  and/or  removed  from  the  base  full-sub  set.  Further  sensitivity 
studies,  not  performed  here,  would  be  needed  to  explore  the  comparative  and 
marginal  effects  of  variation  in  the  partial-substitution  policy  employed. 


Table  2-16.  Add-on  Requirements  Costs  by  Policy  -  MAX  FLY  Example 


Pol  icy 

Add-on 
cost,  $M 

Number  of  part 
types  w/add-on 

Largest  part 
rqmt  (%  of  total) 

Full  substitution 

20 

6 

99 

Partial  substitution 

21 

60 

94 

No  substitution 

43 

99 

72 
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2-4.  WORKAROUND  -  AN  APPROACH  THAT  FAILED 

a.  Background.  At  the  start  of  OPTP,  when  it  was  first  determined  that 
partial  substitution  should  be  investigated,  the  prospects  for  successfully 
designing  appropriate  partial-substitution  logic  for  PARCOM  and  the  ease  of 
integrating  it  into  the  model  were  unknown.  In  view  of  those  uncertainties, 
it  seemed  desirable  to  seek  some  simple  way  of  working  around  the  limita¬ 
tions  of  the  version  of  the  model  in  use  at  that  time  by  developing  some 
kind  of  input  or  run  modifications  that  would  permit  PARCOM  to  effectively 
represent  partial  substitution  without  changes  having  to  be  made  in  the 
program  code.  An  approach  that  seemed  feasible  at  the  time  is  described 
below. 


b.  Approach.  First,  an  unconstrained  cost  residual  requirements  case 
is  run  with  a  full-sub  parts  replacement  policy.  Next,  the  same  case  is 
run  with  a  no-sub  policy.  Relative  to  all  possible  part  replacement  poli¬ 
cies,  the  former  generates  the  smallest  number  of  required  parts  and  part 
types  and  the  latter  the  largest.  In  order  to  represent  a  partial-sub 
case,  one  assumes  that  some  parts  from  the  no-sub  requirements  list  are 
substitutable  and  would  not  be  required  in  a  partial-sub  run  if  they  are  so 
designated.  The  appropriate  substitutable  parts  are  those  showing  up  as 
required  in  the  full-sub  run.  For  the  partial-sub  run,  then,  two  sets  of 
parts  are  established.  One  set  consists  of  those  part  types  designated  as 
required  in  a  full-sub  run,  plus  those  additional  part  types  designated  as 
substitutable  (which  are  associated  with  the  "holes"  in  the  NMCS  aircraft 
generated  in  the  full-sub  run).  The  second  set  consists  of  the  remaining 
nonsubstitutable  part  types.  The  workaround  solution  to  a  partial-sub 
requirements  run  is  just  the  original  full-sub  solution,  plus  the  no-sub, 
NMCS  =  0  solution  for  the  set  consisting  of  the  remaining,  nonsubstitutable 
parts.  NMCS  =  0  is  appropriate  for  this  set,  since  all  the  allowable  NMCS 
aircraft  are  assumed  "locked  up"  supplying  parts  to  the  full-sub  set. 

c.  Results.  The  above  approach  was  tested  with  the  example  cases  of 
the  previous  section.  For  Example  1,  the  extended  PARCOM  and  workaround 
solutions  are  the  same--the  set  of  required  parts  costing  $11,500  in  each 
case.  For  Example  2,  however,  the  workaround  solution  is  three  times  as 
expensive  as  the  PARCOM  direct  modeling  solution — $18,700  versus  $6,300 — 
thus  proving  that  the  workaround  approach  does  not  always  provide  the  right 
answer.  The  difference  is  due  to  the  assignment,  in  Example  2,  of  greatest 
cost  to  Part  3,  one  of  the  nonsubstitutable  set.  It  appears  that  whenever 
one  of  the  parts  from  this  set  is  the  highest  cost  part,  the  workaround 
solution  may  not  be  optimum,  depending  also  on  failure  rates  and  other 
factors.  The  workaround  approach  to  partial  substitution  was  therefore 
discontinued,  especially  since  appropriate  partial  substitution  logic  for 
PARCOM  had,  meanwhile,  been  accomplished. 
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CHAPTER  3 

CAPABILITY  ASSESSMENT  WITH  PARTIAL  SUBSTITUTION 


3-1.  BACKGROUND.  After  each  unconstrained  cost  solution  mix  is  computed, 
PARCOM  generates  a  record  of  daily  and  average  fleet  operational  capability 
achievable  by  stocking  each  computed  requirement.  In  particular,  these 
records  include  achieved  daily  and  average  aircraft  availability,  achieved 
program  flying  hours,  and  achieved  flying  hours  per  available  aircraft  per 
day.  In  computing  these  outputs,  the  new  initial  inventory  is  assumed  to 
be  the  sum  of  the  computed  requirement  and  the  original  initial  inventory. 

3-2.  CHAPTER  ORGANIZATION.  Subsequent  paragraphs  first  illustrate  the 
basic  PARCOM  capability  assessment  under  full  substitution  and  under  no 
substitution  for  the  unconstrained  cost  requirements  of  the  example  case 
defined  in  the  previous  chapter  (Tables  2-1  and  2-2).  The  extension  to 
partial  substitution  is  then  shown  for  its  example  cases  (defined  in  Chapter 
2).  Lastly,  assessment  of  current  inventory  is  portrayed. 

3-3.  ASSESSMENT  WITH  FULL  SUBSTITUTION.  Tables  3-1  and  3-2  show  the  basic 
PARCOM  capability  assessment  calculations,  under  full  substitution,  of  the 
expected  effects  of  stocking  the  requirements  computed  in  Tables  2-4  through 
2-7,  Chapter  2.  Cumulative  net  demand  for  each  part  type  is  based  on 
initial  inventories  being  set  to  include  the  computed  requirements.  NMCS 
aircraft  for  each  day  are  set  equal  to  the  largest  of  the  "cumulative  net 
demand/QPA"  entries  for  the  day.  "Surviving  aircraft"  are  from  the  "cum 
acft  surv"  column  of  Table  2-2.  Aircraft  availability  is  1  minus  the  quo¬ 
tient  of  NMCS  aircraft  and  surviving  aircraft.  Flying  hours  per  (available) 
aircraft  per  day  are  calculated  by  dividing  the  program  flying  hours  for 
each  day  (see  Table  2-2)  by  the  number  of  available  aircraft  on  that  day. 
Average  availability  is  constructed  by  weighting  daily  availabilities  by 
the  daily  surviving  aircraft.  Average  flying  hours  per  (available)  air¬ 
craft  per  day  is  weighted  by  the  available  aircraft  on  each  day. 
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Table  3-1.  Capability  Assessment  for  Unconstrained  Cost  Residual 
Requirement  with  Full  Substitution 


RESIDUAL  RQMT  (20,20, 

0,0)  IS  ADDED  TO 

ORIblNAL  INIT 

(250, 10, 260, iO) 

tn 

n 

#3 

#4 

#5 

CUM  NET 

CUM  NET 

CUM  NET 

CUM  NET 

UEMAND/QPA 

UEMAND/QPA 

DEMANU/OPA 

DEMANU/QPA 

PART  1 

PART  2 

PART  3 

PART  4 

NMCS 

mi 

( I NIT-270) 

(INIT-30) 

(INIT-260) 

(INIT-30) 

ACFT 

(0Rlb#-20)/QPA 

(0Rlb#‘20)/UPA 

(0R1G*-G)/UPA 

(OKIG*-0)/QPA 

MAX  injlJlM) 

(OR  0) 

(OR  0) 

(OR  0) 

(OR  0) 

i 

0 

0 

0 

0 

0 

2 

0 

0 

0 

0 

0 

3 

0 

20 

0 

10 

20 

4 

10 

40 

0 

20 

40 

5 

50 

50 

40 

30 

50 

*  ORIGINAL  CUM  NET 

DEMAND  BASED  ON  URlblNAL  INIT 

Table  3-2 
Residual 

.  Capability  Assessment  for  Unconstrained  Cost 
Requirement  with  Full  Substitution  (continued) 

#5 

#  6 

#7 

NMCS 

SURVIVlNb  ACFT 

FLY  1 Nb  HUURS 

MX 

KEL 

ACFT 

AVAILABILITY 

/ACFT /DAY 

DATA 

1.  -  i 57  #6 

FHP/(#6  x  #7) 

1 

0 

150 

1.00 

3.3 

2 

0 

200 

1.00 

5.0 

3 

20 

200 

•  90 

5*6 

4 

40 

200 

•  80 

9-4 

5 

50 

200 

.75 

10-0 

AVb 

AVAIL 

-  .88 

AVb 

FH/ACFT/UAY  -  6-5 

3-4.  ASSESSMENT  WITH  NO  SUBSTITUTION.  Tables  3-3  and  3-4  show  the  basic 
PARCOM  capability  assessment  calculations,  under  no  substitution,  of  the 
expected  effects  of  stocking  the  requirements  computed  in  Tables  2-8 
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through  2-11.  Cumulative  net  demand  for  each  part  type  is  based  on  initial 
inventories  being  set  to  the  computed  requirements.  Under  a  no-substitution 
policy,  NMCS  aircraft  for  each  day  are  equal  to  the  sum  of  the  cumulative 
net  demand  entries  for  that  day.  Surviving  aircraft  are  from  Table  2-2. 
Other  calculations  are  analogous  to  those  for  the  full-substitution  case. 


Table  3-3.  Capability  Assessment  for  Unconstrained  Cost  Residual 
Requirement  with  No  Substitution 


RESIDUAL  RQMT  (20. 

70.40.30)  IS  ADDED  TO 

ORIGINAL  IN  IT 

(250. 10. 260, 30) 

n 

#2 

#3 

#4 

#5 

CUM  NET 

CUM  NET 

CUM  NET 

CUM  NET 

DEMAND 

DEMAND 

DEMAND 

DEMAND 

PART  1 

PART  2 

PART  3 

PART  4 

NMCS 

DAY  .UNIT-270) 

(1NIT-80) 

. (IN1T-300) 

(IN  IT-60) 

ACFT 

(URIG*-20) 
(UR  0) 

(0RIG*-70) 
(OK  0) 

(OKI  L>* -40 ) 

(OK  0) 

(UKIG*-30) 

(OK  0) 

SUM  OF  #1  -  #4 

1 

0 

0 

0 

0 

0 

2 

0 

0 

0 

0 

0 

5 

0 

0 

0 

0 

0 

4 

10 

0 

0 

0 

10 

5 

50 

0 

0 

0 

50 

*  ORIGINAL  CUM  NET  DEMAND  BASED  UN  ORIGINAL  IN  I T 


Table  3-4.  Capability  Assessment  for  Unconstrained  Cost  Residual 
Requirement  with  No  Substitution  (continued) 


#5 

#6 

#7 

NMCS 

SURVIVING 

ACFT 

flying  hours 

DAY 

ACFT 

ACFT 

AVAILABILITY 

/ACFT /DAY 

DATA 

1-  -  # 5/#6 

FHP/( #6  x  #7) 

1 

0 

150 

1-00 

3.3 

2 

0 

200 

1-00 

5.0 

3 

0 

200 

1.00 

5.0 

4 

10 

200 

•  95 

7.9 

5 

50 

200 

.75 

10.0 

AVG  AVAIL  -  .94 
AVG  FH/ACFT/DAY  -  6-2 
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3-5.  ASSESSMENT  WITH  PARTIAL  SUBSTITUTION 

a.  Example  1.  Tables  3-5  and  3-6  show  the  extended  PARCOM  capability 
assessment  calculations,  under  the  partial-substitution  policy  of  Chapter  2 
(Part  1  and  Part  2  are  the  full-sub  set),  of  the  effects  of  stocking  the 
Example  1  requirements  computed  in  Table  2-13.  Each  day  consists  of  a 
full-sub  assessment  phase  and  a  no-sub  assessment  phase.  Each  full-sub 
phase  is  equivalent  to  a  basic  PARCOM  full-sub  assessment  of  NMCS  aircraft 
with  only  the  full-sub  part  set  considered.  The  resulting  NMCS  aircraft 
for  the  day  are  computed  as  in  Table  3-1.  The  no-sub  phase  is  equivalent 
to  a  basic  PARCOM  no-sub  assessment  of  NMCS  aircraft  with  only  the  no-sub 
part  set  considered.  Resulting  NMCS  aircraft  for  the  day  are  computed  as 
in  Table  3-3.  Under  our  definition  of  partial  substitution,  each  NMCS  air¬ 
craft  is  "down"  due  to  either  at  least  one  needed  full-sub  part  or  for  a 
single  needed  no-sub  part,  but  not  to  a  needed  combination  of  the  two  types 
Therefore,  the  order  of  performing  the  phases  is  irrelevant.  On  each  day, 
after  the  two  NMCS  aircraft  calculation  phases  are  completed,  the  sum  of 
the  two  results  yields  the  total  NMCS  aircraft  for  the  day.  Other  calcu¬ 
lations  on  Table  3-6  are  exactly  analogous  to  those  applied  by  basic  PARCOM 
in  Tables  3-2  and  3-4. 


Table  3-5.  Capability  Assessment  for  Unconstrained  Cost  Residual 
Requirement  with  Partial  Substitution  -  Example  1 


RESIDUAL  RUMT  (20,20,40,30)  IS  ADDED  TO  ORIGINAL  IN  I T  (250,10,26000) 


#1  #2 


DAY  PHASE* 

CUM  NET 
UEMANU/QPA 
PART  1 
UNIT-270) 

COM  NET 
UEMANU/QPA 
PART  2 
(INIT-30) 

(0R1U**“20)/QPA 

(0RIb**-20)/Qt 

(OR  0) 

(OK  0) 

1 

FS 

0 

0 

NS 

-- 

-- 

2 

FS 

0 

0 

NS 

-- 

3 

FS 

0 

20 

NS 

— 

— 

4 

FS 

10 

40 

NS 

-- 

-- 

5 

FS 

50 

50 

NS 

-- 

-- 

#3 

CUM  NET 
DEMAND 
PART  3 
(INIT=500) 

#4 

CUM  NET 
DEMAND 
PART  4 
UNIT-60) 

#5 

NMCS 

   ACFT  

(0RI0##-40) 

(0RIb*#“30) 

MAX  (I1J2)  (FS 

PHASE) 

(OK  0) 

(UR  0) 

#3+  #4  (NS 

PHASE) 

0 

0 

0 

0 

0 

0 

0 

0 

-- 

— 

20 

0 

0 

0 

— 

— 

40 

0 

0 

0 

-- 

— 

50 

0 

0 

0 

*  FS  -  'FULL  SUB'  PHASE  (PROCESSES  'FULL  SUB '  PART  SET  (PARTS  1  &  2)) 
MS  -  'MO  SUB'  PHASE  (PROCESSES  'MO  SUB'  PART  SET  (PARTS  3  &  4)) 

**  ORIGINAL  CUM  MET  DEMAMU  BASED  ON  ORIGINAL  INIT 
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Table  3-6.  Capability  Assessment  for  Unconstrained  Cost  Residual 
Requirement  with  Partial  Substitution  -  Example  1  (continued) 


13  AY 

#6 

TOTAL 

NMCS 

ACFT 

#7  . 

SUKVIVINb 

ACFT 

#8 

ACFT 

AVAILABILITY 

FLYING  HUURS 
/ACF.T/DAY 

#5(FS)  ♦  #5 

(NS) 

DATA 

1.  -  #b/#7 

FHP/(#7  x  #8) 

1 

0 

150 

1-00 

3-3 

2 

0 

200 

1.00 

5.0 

5 

20 

200 

•  90 

5.6 

4 

40 

200 

.80 

9.4 

5 

50 

200 

.75 

10.0 

AVb 

AVAIL  -  .88 

AVG 

FH/ACFT/DAY  - 

6.5 

b.  Example  2.  Tables  3-7  and  3-8  show  the  extended  PARCOM  capability 
assessment  calculations,  under  the  partial-substitution  policy  of  Chapter 
2,  of  the  effects  of  stocking  the  Example  2  requirements  computed  in  Table 
2-15.  Calculations  are  exactly  analogous  to  those  of  Tables  3-5  and  3-6. 


Table  3-7.  Capability  Assessment  for  Unconstrained  Cost  Residual 
Requirement  with  Partial  Substitution  -  Example  2 


RESIDUAL  RUMT  (60.60,0.30)  IS  ADDED  TO  ORIGINAL  IN  I T  (250,10,260,30) 


Ml  1 

PHASE* 

#1 

CUM  NET 
UEMAND/QPA 
PART  1 
(IMiT-310) 

n 

CUM  NET 
DEMAND/QPA 

PART  2 
(IMIT-7Q) 

#3 

CUM  NET 
DEMAND 

PART  3 

LW1I-26G) 

#4 

CUM  NET 
DEMAN U 

PART  4 
(1N1T-60) 

#5 

NMCS 

ACFT 

(0Rlli##-60)/QPA 

(0Rlb##-b0)/QPA 

(0RIb##-0) 

(URIb**-50) 

MAX  <#1,*2) 

(FS  PHASE) 

(OK  0) 

(OR  0) 

(OR  0) 

(OK  0) 

#3+  #4 

(NS  PHASE) 

1 

FS 

0 

0 

— 

-- 

0 

NS 

-- 

— 

0 

0 

0 

2 

FS 

0 

0 

— 

-- 

0 

NS 

— 

— 

0 

0 

0 

3 

FS 

0 

0 

— 

— 

0 

NS 

— 

~ 

0 

0 

0 

4 

FS 

0 

0 

— 

— 

0 

NS 

— 

— 

0 

0 

0 

5 

FS 

70-60-10 

0 

— 

— 

10 

NS 

-- 

-- 

40 

0 

40 

*  FS 

■  'FULL  SUB'  PHASE  (PROCESSES  'FULL  SUB ' 

PART  SET  (PARTS  1  &  2)) 

NS 

-  'NO 

SUB'  PHASE  (PROCESSES  'NO  SUB'  PART  SET  (PARTS 

3  &  4)) 

**  ORIGINAL  CUM  NET  DEMAND  BASED  ON  ORIGINAL  IN  IT 
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Table  3-8.  Capability  Assessment  for  Unconstrained  Cost  Residual 
Requirement  with  Partial  Substitution  -  Example  2  (continued) 


m. 

#6 

TOTAL 

NMCS 

ACFT 

#7 

SURVIVING 

ACFT 

#8 

ACFT- 

AVAILABILITY 

FLY I Nb  HOURS 
/ACFT/UAY 

#5(FS)  +  #6  (NS) 

DATA 

1.  -  #6/#7 

FHP/(#7  x  #8) 

i 

0 

150 

1-00 

}•  3 

2 

0 

200 

1-00 

5-0 

3 

0 

200 

1.00 

5-0 

4 

0 

200 

1-00 

7.5 

5 

10+40*50 

200 

.75 

10.0 

A Vii  AVAIL  *  -95 
AVli  FH/ACFT/UAY  -  6-1 


3-6.  ASSESSMENT  OF  CURRENT  INVENTORY  WITH  PARTIAL  SUBSTITUTION 

a.  Logic.  By  current  inventory  is  meant  any  user-specified  inventory. 
This  is  in  contrast  to  the  "required  inventory"  as  assessed  above.  The 
basic  logic  of  assessment  of  current  inventory  in  extended  PARCOM  is  the 
same  as  in  basic  PARCOM.  With  unconstrained  costs,  net  demand  was  based  on 
the  entire  planned  flying  hour  program  being  flown.  For  a  current  inventory 
mix,  some  unknown  (at  first)  number  of  hours  will  be  flown.  That  number 
must  initially  be  estimated  and  an  iterative  approach  applied  to  determine 
NMCS  aircraft,  availability,  and  achievable  program  flying  hours.  For  each 
day,  therefore,  a  starting  estimate  of  flying  hours  flown  is  made.  The 
starting  (first  day's)  estimate  is  the  program  flying  hours.  Then,  net 
demand,  as  based  on  the  estimated  flying  hours,  is  computed,  followed  by 
implied  NMCS  aircraft  (generated  by  the  estimated  flying  hours),  achievable 
flying  hours,  and  flying  hours  per  available  aircraft.  The  achievable 
flying  hours  are  compared  with  the  estimated  flying  hours  flown.  If,  based 
on  input  thresholds,  they  are  close  enough,  the  iterations  stop.  If  not, 
the  calculations  are  repeated  based  on  a  new  starting  estimate  of  flying 
hours  equal  to  the  average  of  the  estimated  and  the  achieved  flying  hours. 
After  iterations  for  a  day  are  completed,  the  available  aircraft  for  the 
day  and  their  flying  hour  potential  are  calculated  based  on  the  last  calcu¬ 
lation  of  NMCS  aircraft  and  on  the  maximum  flying  hour  potential  per  air¬ 
craft  per  day  (an  input).  Processing  for  the  next  day  uses  a  starting 
estimate  of  flying  hours  based  on  the  achieved  flying  hours  of  the  previous 
day. 
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b.  Example.  Tables  3-9  through  3-11  show  the  extended  PARCOM  current 
inventory  capability  assessment  calculations,  through  4  days,  for  the 
example  of  Tables  2-1  and  2-2.  For  example  purposes,  iterations  are  limited 
to  two.  Calculation  of  daily  NMCS  aircraft  is  done  in  two  phases,  as 
before,  but  cumulative  net  demand  is  based  on  the  current  inventory  and  on 
the  estimated  flying  hours  for  the  iteration.  The  NMCS  aircraft  for  the 
last  iteration  of  each  day  become  the  basis  of  final  daily  calculations. 

In  column  7  calculations,  surviving  aircraft  are  from  Table  2-2,  while  NMCS 
aircraft  are  from  column  6.  In  column  8,  achieved  flying  hours  are  capped 
at  the  daily  program  flying  hour  objective.  Column  9  shows  the  calculation 
of  closeness  thresholds  for  estimated  versus  achieved  flying  hours.  As  in 
basic  PARCOM,  the  model  user  sets  the  limits  on  iterations  and  closeness 
thresholds. 


Table  3-9.  Capability  Assessment  of  Current  Inventory 
with  Partial  Substitution 


INVENTORY 

-  (250,10,260.30) 

ITERATION 

LIMIT  -  2 

#1 

#2 

tti 

#4 

45 

CUM  NET 

COM  NET 

COM  NET 

CUM  NET 

NMCS 

EST 

DEMAND*  *  * 

UEMANU*" 

UEMANI)*" 

DEMAND"* 

AC  FT 

ITER¬ 

FLY 

PART  1 

PART  2 

PART  i 

PART  4 

MAX  (# iJ2) 

DAY 

ATION 

PHASE* 

UiS" 

UNIT-250) 

(IN1T-1Q) 

(1N1T-260) 

UNIT-30) 

UR  (#3  ♦  4i*) 

1 

1 

FS 

500 

0 

0 

0 

1 

NS 

500 

**“ 

0 

0 

0 

2 

1 

FS 

1000 

0 

20 

... 

20 

1 

NS 

1000 

— “ 

0 

U 

0 

3 

1 

FS 

10UU 

0 

40 

_ 

40 

1 

NS 

1000 

"  - 

0 

10 

10 

4 

1 

FS 

1500 

30 

60 

-- 

__ 

60 

1 

NS 

1500 

0 

20 

2U 

2 

FS 

1350 

13 

57 

-- 

57 

2 

NS 

1350 

— 

— 

0 

17 

17 

*  FS 

-  'FULL 

SUB' 

PHASE;  NS  -  'NU 

SUB'  PHASE 

"  -  FHP  UN  ITERATION  1;  -  (EFH  *  AFHJ/2  ON  ITERATION  2 
•"  CALCOLATEO  AS  COM  FAI LORES  *  COM  RETORNS  -  INIT  INVENTORY 
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Table  3-10.  Capability  Assessment  of  Current  Inventory 
with  Partial  Substitution  (continued) 


#6 

# 7 

#8 

TOTAL 

ITER- 

NMCS 

AVAIL 

ACHIEVED 

(EFH  -  AFH )/ 

MI 

AT  1UN 

ACFT 

ACFT 

FLY INb  HRS 

( AVb  UAY  FHP) 

#5(FS)  +  #5  (NS) 

SURV- 

M I N ( # 7  X  MFHAD* ) 

NMCS 

OR  (FHP) 

1 

1 

0 

150 

500 

0 

2 

1 

20 

180 

1000 

0 

3 

1 

50 

150 

1000 

0 

4 

1 

80 

120 

1200 

■  27 

2 

74 

126 

1260 

.08 

* 

MAXIMUM  FLY INb  HOURS  PER  ACFT 

PER  UAY 

Table  3-11.  Capability  Assessment  of  Current  Inventory  with 
Partial  Substitution  (continued) 


#10 

* 

FRAC 

SURVIVING 

ACFT 

FLYING  PGM 

DAY 

ACFT 

AVAIL 

ACHIEVED 

DATA 

#7/#10 

#8/FHP 

1 

150 

1-00 

1-00 

2 

200 

•  90 

1.00 

3 

200 

.75 

1-00 

A* 

200 

.63 

.84 

*  LAST 

ITERATION'S 

VALUES 
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c.  Full-scale  Data  Base  Application.  Figure  3-1  shows  comparative  (by 
policy)  capability  assessement  of  current  inventory,  in  terms  of  fraction 
of  daily  flying  program  achieved,  for  the  MAX  FLY  example  case  of  paragraph 
2-3.  While  the  partial-substitution  policy  has  almost  one-third  of  the 
data  base  parts  in  the  full-sub  set,  there  is  only  a  small  difference 
between  program  flying  hour  achievement  under  partial  substitution  and  under 
no  substitution.  Part  of  the  reason  is  that  the  mix  of  parts  comprising 
the  full-sub  set  under  the  chosen  partial-substitution  policy  is  probably 
not  the  best  one  in  terms  of  maximizing  fleet  capability.  Apparently,  the 
criteria  defining  the  chosen  partial-substitution,  full-substitution  set 
(NRTS>.50  or  retail  repair  time  >  30)  do  not  correlate  closely  with  per¬ 
formance.  That  policy  does  have  a  plausible  aspect  in  that  parts  which  are 
repaired  at  depot  and/or  which  have  a  long  repair  cycle  time  appear  to  be 
more  likely  candidates  for  substitution.  However,  items  with  high  failure 
rates  may  be  more  appropriate  as  members  of  the  full-sub  set.  Preliminary 
testing  indicates  that  this  may  be  so.  In  any  case,  Figure  3-1  suggests 
that  use  of  partial  substitution  may  not  always  be  justified  by  the  returns 
in  terms  of  improved  flying  hour  productivity. 


Figure  3-1.  Capability  Assessment  of  Current  Inventory  - 

MAX  FLY-  Example  Case 
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CHAPTER  4 

DISTRIBUTING  PARTS  OVER  TIME 


4-1.  BACKGROUND.  The  basic  PARCOM  Model  assumes  that  all  spare  assets  are 
front-loaded,  i.e.,  that  they  are  all  available  at  retail  on  Day  1  of  the 
scenario.  The  Overview  Model  (evaluated  in  the  Aircraft  Spare  Stockage 
Methodology  Study)  allows  the  user  to  specify  a  phasing-in  of  parts  (into 
theater)  over  time.  Such  phasing-in  is  more  representative  of  reality  since 
it  reflects  movement  of  unit  ASL/PLLs  and  transit  of  depot  stocks.  The 
extended  PARCOM  was  reconfigured  to  allow  initial  stock  to  be  received  in 
theater  according  to  a  specified  planning  schedule.  The  planning  schedule 
is  assumed  operative;  disruptions  in  the  schedule,  due  to  attrition  of 
resupply  lines  and  facilities,  is  not  simulated. 

4-2.  LOGIC.  Extended  PARCOM  distributes  parts  over  intervals  of  5  days 
rather  than  over  individual  days,  as  in  Overview.  All  parts  due  to  be 
received  during  a  given  5-day  interval  are  distributed  uniformly  throughout 
that  interval.  An  exception  is  Day  1  of  the  scenario.  All  parts  due  in 
(or  in  place)  on  Day  1  are  treated  as  received  at  the  beginning  of  Day  1. 

The  categories  of  parts  treated  are  as  follows: 

a.  Depot  Serviceables.  These  consist  of  serviceable  parts  located  at 
depot  at  the  start  of  the  scenario.  For  each  part,  the  initial  stock  of 
depot  serviceables  is  entered  in  the  part  data  base  input.  The  scenario 
input  specifies  a  depot  lag,  L,  and  a  depot  distribution  time,  D, 
applicable  to  all  parts,  such  that,  for  each  part,  the  initial  stock  of 
depot  serviceables  is  distributed  (received  at  retail)  uniformly  between 
Day  (L  +  1)  and  Day  (L  +  D). 

b.  Depot  Unserviceables.  These  consist  of  unserviceable  parts  located 
at  depot  at  the  start  of  the  scenario.  They  are  at  various  stages  of  the 
depot  repair  process  and,  after  repair,  are  to  be  shipped  to  retail.  Since 
a  part  may  be  at  any  stage  of  its  repair  cycle,  distribution  of  uncondemned 
depot  unserviceables  for  each  part  is  assumed  uniform  over  an  interval 
equal  to  the  depot  repair  time  (DRT)  for  the  part,  with  the  first  receipt 
(at  retail)  after  a  lag  equal  to  the  order/ship  time  (OST)  for  the  part. 

For  each  part,  the  initial  stock  of  depot  unserviceables,  the  depot 
condemnation  rate  (DC),  the  OST,  and  the  depot  repair  time  are  input  in  the 
part  data  base.  Letting  A  =  number  of  depot  unserviceables,  the  extended 
PARCOM  distributes  (1-DC)  x  A  parts  at  retail  between  Day  (OST  +  1)  and  Day 
(OST  +  DRT). 

c.  War  Reserve  Serviceables.  These  consist  of  serviceable  parts  in  the 
war  reserve  located  at  retail.  For  each  part,  the  amount  of  the 
serviceable  war  reserve  is  input  in  the  parts  data  base.  The  entire  stock 
is  treated  as  available  at  retail  from  the  scenario  start  (Day  1). 
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d.  War  Reserve  Unserviceables.  These  consist  of  unserviceable  war 
reserve  parts  located  at  retail  at  the  start  of  the  scenario.  Some  of 
these  will  be  condemned.  Others  will  be  sent  to  depot  for  repairs.  Others 
are  in  various  stages  of  repair  at  retail.  The  distribution  of  these  parts 
is  as  follows: 

(1)  Items  repairable  at  retail  -  for  each  part,  let  NRTS  =  the  NRTS 
fraction,  BR  =  the  retail  repair  time,  BC  =  retail  condemnation  rate,  and 
A  =  number  of  war  reserve  unserviceables.  Then  extended  PARCOM  distributes 
at  the  theater  (1-NRTS)  x  A  x  (1-BC)  parts  repaired  at  retail  between  Day  1 
and  Day  BR.  All  of  these  factors  are  input  in  the  parts  data  base. 

(2)  Items  not  repairable  at  retail  -  for  each  part,  let  NRTS  =  the 
NRTS  fraction,  DR  =  the  depot  repair  time,  DC  =  depot  condemnation  rate, 

OST  =  the  order/ship  time,  and  A  =  number  of  war  reserve  unserviceables. 
Then  extended  PARCOM  returns  to  the  theater  (NRTS)  x  A  x  ( 1 -DC )  parts 
repaired  at  depot  between  Day  (2  x  OST  +  1)  and  Day  (2  x  OST  +  DR). 

e.  ASL/PLL  Deployments.  For  each  part,  the  extended  PARCOM  parts  data 
base  inputs  on  Day  1  the  total  in-place  ASL/PLL  parts.  In  addition,  total 
ASL/PLL  parts  deployed  after  Day  1  are  input  for  successive  5-day  intervals 
of  the  scenario. 

4-3.  IMPACT.  The  distribution  of  parts  over  time,  as  opposed  to  front 
loading  of  stocks,  has  no  effect  on  PARCOM  results  if  all  initial  assets 
reach  retail  before  they  are  required  (as  replacements).  An  ideally 
efficient  stockage  and  transportation  system  will  achieve  this.  Parts 
distribution  over  time  may  effect  an  increase  in  requirements,  relative  to 
front  loading,  if  initial  assets  are  sufficiently  delayed  so  that  they  do 
not  arrive  in  retail  before  all  retail  stocks  are  drawn  down.  In  effect, 
such  delayed  assets  may  have  their  usefulness  negated  because  they  are  in 
the  wrong  place  at  the  wrong  time.  Similarly,  the  effect  of  such  delays  on 
capability  assessment  of  current  inventory  may  be  a  decrease  in  the  period 
over  which  the  flying  program  can  be  continuously  sustained. 

4-4.  EXAMPLE  RESULTS.  A  comparative  example  is  presented  of  the  effects 
of  part  maldistribution  in  the  full-substitution  demonstration  example  of 
Chapter  2,  which  assumed  front  loaded  parts.  The  parts  data  of  Table  2-1 
are  used,  except  that  Part  1  initial  stock  is  distributed  over  time  as 
specified  in  Table  4-1.  Since  just  Part  1  data  is  altered,  only  the  full- 
substitution  requirement  for  that  part  is  recalculated  by  revising  Table 
2-4  in  accordance  with  the  parts  distribution.  Table  4-2  shows  the  revised 
calculations.  The  basic  change  is  in  column  number  3,  in  which  IN  IT  (front 
loaded  initial  stock)  of  Table  2-4  is  replaced  by  STK  (cumulative  stock 
distributed)  from  Table  4-1.  The  net  result  is  that  cumulative  net  demand 
through  Day  4  is  larger  under  parts  distribution.  The  overall  requirement 
is  larger  (70,  versus  20  for  the  front  loaded  case)  because  the  parts 
deployment  is  badly  timed.  On  Days  2  through  4,  net  demands  exist  while 
initial  assets  are  unable  to  fill  them,  due  to  distribution  delay. 
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Table  4-1.  Example  -  Part  1  Stock  Distribution  Over  Time 


ALL  INITIAL  STOCKS  UNCHANGED  EXCEPT 
-  PART  1  DISTRIBUTION 
CUM  STUCK 

DAY  DISTRIBUTED 

1  40 

2  80 

3  120 

4  160 

5  250 


Table  4-2.  Unconstrained  Cost  Residual  Requirement  with  Full  Substitution  - 
Part  1  (initial  stock  distributed  over  time) 


PART  1  CALCULATIONS 


DAY 

#i 

CUMULATIVE 

FAILURES 

#2 

CUM  RET 
REPAIRS 

#3 

CUMULATIVE 

NET  DEMAND 

04 

ALLOWABLE 
STUCKOUT  S 

DAY 

RUMTS 

MAX  [#1-<I2+STK*)] 

MAX  (03-04) 

OK  (0) 

UR  (0) 

1 

40 

0 

40-0-40  -  0 

100 

0 

2 

120 

0 

120-0-80  -  40 

100 

0 

3 

200 

0 

200-0-120  -  80 

100 

0 

4 

320 

40 

320-40-160  -  120 

50 

70 

5 

440 

120 

440-120-250  -  70 

50 

20 

PART  1  OVERALL  RUMT  -  LARGEST  DAY  KQMT  ■  70 


*  CUMULATIVE  STOCK  DISTRIBUTED  FRUM  TABLE  4-1 
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CHAPTER  5 

CONSTRAINED  COST  REQUIREMENTS 


5-1.  BACKGROUND.  While  the  unconstrained  cost  solution  is  the  one  that 
best  meets  the  flying  program,  a  full  requirements  buy  may  not  be  afford¬ 
able  if  funds  are  limited.  With  constrained  costs,  a  user  wishes  to  apply 
limited  funds  to  buy  a  cost  effective  slice  of  the  full  requirements.  The 
basic  PARCOM  only  treated  the  constrained-cost  case  for  a  no  substitution 
policy.  Neither  full  substitution  nor  partial  substitution  were  addressed. 
The  extended  PARCOM  incorporates  a  method  for  deriving  cost  effective  con¬ 
strained  cost  requirements  under  partial  substitution.  For  a  no-substi¬ 
tution  policy,  the  extended  PARCOM  constrained  cost  algorithm  yields  the 
same  solution  as  the  basic  PARCOM  constrained  cost  algorithm. 

5-2.  CONSTRAINED  COST  NO-SUBSTITUTION  REQUIREMENT  IN  BASIC  PARCOM.  This 
algorithm  is  covered  in  the  PARCOM  Functional  Description.  To  summarize, 
after  the  unconstrained  cost,  no-substitution  requirements  are  computed, 
they  become  the  basis  for  the  constrained  cost  no-substitution  solution.  A 
cost  limit  on  spares  is  input  along  with  the  other  scenario  and  objective 
data.  A  constrained  cost,  no-substitution  parts  mix  can  be  constructed  by 
the  simulated  purchase,  in  order  of  increasing  part  unit  cost,  of  the  part 
requirements  of  the  unconstrained  cost  solution  until  the  money  is  exhausted. 
That  would  entail  the  procurement  of  the  largest  number  of  total  parts  from 
the  unconstrained  cost  solution.  However,  another  characteristic  of  such  a 
constrained  cost  parts  mix  is  that  it  is  the  mix  which  has  the  fewest 
unbought  (hence,  unstocked)  items  from  the  unconstrained  cost  solution. 

The  PARCOM  algorithm  arrives  at  its  solution  by  calculating  unbought  items. 
Initially,  it  spends  the  full  cost  of  the  unconstrained  cost  requirements 
mix,  assuming  it  to  be  the  constrained  cost  solution.  Subsequently  PARCOM 
selects  the  fewest  number  of  items  to  remove  from  that  solution  until  the 
remaining  parts  mix  is  priced  at  the  input  cost  limit.  Because  the  pro¬ 
gramed  algorithm  solves  by  unbuying  items  rather  than  buying  them,  parts 
are  processed  in  decreasing  order  of  part  unit  cost.  Under  a  policy  of  no 
substitution  each  unbought  item  (regardless  of  part  type)  creates  an  NMCS 
aircraft.  Therefore,  our  constrained  cost,  no-substitution  solution  mix 
minimizes  the  instances  of  NMCS  created  by  the  constrained  funds.  The 
solution  tends,  heuristically,  toward  the  achievement  of  maximum  cumulative 
flying  hours. 

5-3.  APPROACH  IN  EXTENDED  PARCOM.  First,  a  method  for  treating  full  sub¬ 
stitution  was  devised.  The  basic  PARCOM  constrained  cost  algorithm  for  no 
substitution  was  retained  and  combined  with  the  full-substitution  algorithm 
to  yield  a  composite  algorithm  applicable  to  all  partial  substitution  cases. 
However,  since  this  algorithm  is  not  known  to  be  the  best  in  all  cases,  its 
solution  is  compared,  in  terms  of  resulting  program  flying  hour  productivity, 
with  a  solution  derived  by  another  algorithm.  The  solution  yielding  the 
most  program  flying  hours  is  selected.  Herein,  we  denote  these  two  algo¬ 
rithms  as  constrained  cost  algorithm  one,  and  constrained  cost  algorithm 
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two  respectively.  Since  both  are  based  on  the  approach  for  a  full-substi¬ 
tution  case,  that  case  will  be  discussed  first,  followed  by  its  adaptation 
to  the  two  constrained  cost  algorithms. 

5-4.  CONSTRAINED  COST  WITH  FULL  SUBSTITUTION.  For  this  case,  the  con¬ 
strained  cost  solution  is  equivalent  to  using  maximum  consecutive  days  of 
flying  hour  program  achievement  as  an  objective.  This  algorithm  is 
described  in  the  PARCOM  Functional  Description.  The  nature  of  full 
substitution  is  such  that  the  solution  yielding  the  maximum  consecutive 
days  of  flying  program  sustainability  for  fixed  funds  will  also  be  the 
solution  yielding  maximum  total  program  flying  hour  productivity.  As  was 
shown  in  the  Aircraft  Spare  Stockage  Methodology  Study  Report,  this  was  not 
the  case  with  a  no-substitution  policy.  The  algorithm  for  obtaining  such  a 
maximum  sustainability  solution  also  is  described  in  the  basic  PARCOM 
Functional  Description.  Solution  generation  in  extended  PARCOM  is  automatic 
for  full  substitution. 

5-5.  CONSTRAINED  COST  ALGORITHM  1.  After  the  unconstrained  cost  parti al- 
substitution  requirements  are  computed,  they  become  the  basis  for  a  con¬ 
strained  cost  solution  as  follows: 

a.  The  no-substitution  constrained  cost  algorithm  described  in  paragraph 
5-2  is  applied  to  yield  the  portion  of  the  unconstrained  cost  requirement 
for  the  no-sub  part  set  which  yields  the  most  cost-effective  mix  of  no-sub 
parts  priced  at  (or  below)  the  input  cost  limit.  If  the  input  cost  limit 

is  less  than  or  equal  to  the  cost  of  the  unconstrained  cost  no-sub  require¬ 
ment,  then  the  algorithm  solution  for  the  no-sub  set  is  the  overall  solution 
and  the  algorithm  terminates.  However,  if  the  input  cost  limit  exceeds  the 
unconstrained  cost  no-sub  requirement,  then  that  entire  requirement  is 
assumed  bought  and  the  input  cost  limit  is  adjusted  by  subtracting  the  cost 
of  the  entire  no-sub  requirement  from  it.  The  second  phase  of  the  algorithm 
(below)  is  then  applied  with  this  adjusted  cost  limit. 

b.  During  the  second  phase  of  the  algorithm,  a  version  of  the  full- 
substitution  constrained  cost  algorithm  described  in  paragraph  5-4  is 
applied  to  the  full-sub  part  set  using  the  adjusted  cost  limit  as  follows: 

(1)  During  the  solution  of  the  unconstrained  cost  case,  the  model 
stores,  for  each  day,  the  cumulative  total  cost  of  all  the  full-sub  parts 
in  the  partial-substitution  unconstrained  cost  requirement  for  the  scenario 
truncated  at  that  day.  The  model  determines  D,  the  last  (latest)  day  for 
which  the  associated  cumulative  requirement  cost  of  the  full -sub  set  is 
less  than  or  equal  to  the  adjusted  cost  limit. 

(2)  Next,  the  model  generates  an  unconstrained  cost  partial -substi¬ 
tution  solution  for  the  scenario  truncated  at  that  day.  The  full-sub  parts 
required  in  that  solution,  when  combined  with  the  no-sub  requirement  which 
was  bought  in  the  first  phase,  comprise  the  overall  algorithm  solution. 

There  is  no  guarantee  that  the  above  solution  is  optimum,  but  it  does  com¬ 
bine  the  two  algorithms  discussed  earlier. 
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5-6.  CONSTRAINED  COST  ALGORITHM  2.  This  algorithm  is  a  version  of  the 
maximum  sustainability  solution  described  in  paragraph  5-4.  It  will 
generate  a  solution  yielding  the  maximum  consecutive  days  of  program  flying 
hour  achievement.  However,  the  resulting  solution  may  not  yield  maximum 
total  program  flying  hours  achievable.  The  algorithm  is: 

a.  During  solution  of  the  unconstrained  cost  case,  the  model  stores, 
for  each  day,  the  cumulative  total  cost  of  all  parts  in  the  partial- 
substitution  unconstrained  cost  requirement  for  the  scenario  truncated  at 
that  day.  The  model  then  determines  D,  the  latest  day  for  which  the 
associated  cumulative  total  requirement  cost  is  less  than  or  equal  to  the 
cost  limit. 

b.  Next,  the  model  generates  an  unconstrained  cost  partial-substitution 
solution  for  the  scenario  truncated  at  that  day.  The  resulting  solution 
mix  is  the  overall  algorithm  solution. 

5-7.  SOLUTION  SELECTION.  The  preferred  solution  mix,  of  those  generated 
by  the  two  algorithms,  is  the  one  which  yields  the  maximum  program  flying 
hour  productivity  in  the  scenario.  The  model  therefore  does  two  separate 
current  inventory  capability  assessments  of  the  current  inventories  based 
on  the  two  constrained  cost  algorithm  solutions  being  bought  and  stocked. 

The  add-on  solution  requirement  is  assumed  to  be  added  to  the  war  reserve. 
The  final  constrained  cost  solution  is  the  one  (of  the  two  generated)  for 
which  the  associated  capability  assessment  yields  the  larger  value  for 
average  fraction  total  flying  hour  program  achieved. 

5-8.  SAMPLE  RESULTS.  To  illustrate  the  algorithm  described  above,  the 
extended  PARCOM  was  applied,  in  a  constrained  cost  mode,  to  the  partial- 
substitution  MAX  FLY  example  of  paragraph  2-3.  Table  5-1  summarizes 
requirement  costs  with  an  unconstrained  budget.  Total  cost  is  the  sum  of 
the  cost  of  full-sub  parts  and  of  no-sub  parts.  Three  cost  limits,  as 
shown  in  Tables  5-2  and  5-3  were  applied.  Table  5-2  shows  the  comparative 
results,  in  terms  of  flying  hour  productivity,  of  the  two  constrained  cost 
algorithms  described  previously.  Notice  that  the  solution  selection,  using 
the  preferred  algorithm,  is  based  on  algorithm  2  in  one  case  and  algorithm 
1  in  two  cases.  Table  5-3  shows  the  composition  of  costs  of  the  constrained 
cost  requirement.  In  this  case,  the  no-sub  parts  seem  to  be  preferred  by 
the  extended  PARCOM  algorithm.  For  the  example  cost  limit  ($.2M)  which  is 
less  than  the  total  cost  of  no-sub  parts  in  the  unconstrained  cost  require¬ 
ment  ( $1 . 1M  in  Table  5-1),  only  no-sub  parts  are  bought.  For  the  example 
cost  limits  ($2M,  $3M)  which  exceed  the  total  cost  of  no-sub  parts  with 
unconstrained  budget,  all  of  the  no-sub  parts  in  the  unconstrained  budget 
requirement  are  bought.  Algorithm  1  always  prefers  no-sub  part  purchases. 
However,  algorithm  2  may  buy  a  mix  of  both. 
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Table  5-1.  Add-on  Requirements  Costs  -  Unconstrained  Budget  with 
Partial  Substitution  -  MAX  FLY  Example 


Total  cost  ($M) 

Cost  ($M)  by  part  set 

Full  sub 

No  sub 

21.0 

19.9 

1.1 

Table  5-2.  Comparison  of  Constrained  Cost  Algorithms  -  Add-on 
Requirements  -  Partial  Substitution  -  MAX  FLY  Example 


Cost  limit  ($M) 

Fraction  flying 

program  achieved 

Preferred 

algorithm 

Algorithm  1 

Algorithm  2 

0.2 

.49 

.54 

2 

2.0 

.81 

.58 

1 

3.0 

.83 

.62 

1 

Table  5-3.  Add-on  Requirements  Costs  -  Constrained  Budget  with 
Partial  Substitution  -  MAX  FLY  Example 


Cost  limit  ($M) 

Solution  cost  ($M)  by  part  set 

Full-sub  parts 

No-sub  parts 

0.2 

0.0 

0.2 

2.0 

0.9 

1.1 

3.0 

1.9 

1.1 
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CHAPTER  6 
OBSERVATIONS 


6-1.  PARTIAL-SUBSTITUTION  REQUIREMENTS.  Extended  PARCOM  is  restricted  to 
partial  substitution  policies  in  which  all  part  types  are  partitioned  by 
the  model  user  into  a  full-sub  set,  within  which  all  parts  are  substitut¬ 
able,  and  a  no-sub  set,  within  which  no  parts  are  substitutable.  However, 
considerable  flexibility  is  allowed  by  such  policies.  Iterative,  automated 
application  of  basic  PARCOM  logic  enables  calculation  of  least-cost  require¬ 
ments  solutions  under  partial  substitution  and  a  no-sub  set  within  which  no 
parts  are  substitutable.  Example  application  showed  extended  PARCOM  to 
give  plausible  results  with  partial  substitution  costs  between  (low)  costs 
under  full  substitution  and  (high)  costs  under  no  substitution. 

6-2.  PARTIAL-SUBSTITUTION  CAPABILITY  ASSESSMENT.  Extended  PARCOM  can  eval¬ 
uate  fleet  capability  (availability,  fraction  flying  program  achieved)  for 
an  input-specified  initial  spares  inventory  or  for  a  spares  inventory 
reflecting  a  PARCOM  requirements  solution  being  stocked.  Example  applica¬ 
tions  showed  plausible  results  with  fleet  capability  under  partial  substitu¬ 
tion  between  (low)  capability  under  no  substitution  and  (high)  capability 
under  full  substitution. 

6-3.  PARTS  DISTRIBUTED  OVER  TIME.  Extended  PARCOM  allows  initial  spare 
stocks  to  be  deployed  to  retail  in  5-day  intervals,  according  to  user 
input.  Example  applications  showed  plausible  results  with  spare  require¬ 
ments  increasing  if  initial  stocks  are  withheld  so  long  that  they  are 
unavailable  when  needed  at  retail. 

6-4.  PARTIAL  SUBSTITUTION  WITH  CONSTRAINED  COST.  A  constrained  cost  solu¬ 
tion  algorithm  for  the  full  substitution  case  was  developed.  This  was  com¬ 
bined  with  the  basic  PARCOM  solution  algorithm  for  the  no-substitution  case 
to  yield  a  composite  algorithm  for  treating  constrained  cost  under  partial 
substitution  in  extended  PARCOM.  However,  since  the  algorithm  does  not 
always  give  the  best  solution  (i.e.,  the  one  yielding  maximum  achievable 
program  flying  hours  with  the  constrained  funds),  a  second  algorithm  was 
also  devised.  Extended  PARCOM  applies  both  algorithms  and  chooses  the  solu¬ 
tion  mix  from  the  one  yielding  higher  flying  productivity.  Example  results 
appeared  plausible. 
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appendix  a 

EXTENDED  PARCOM  -  INPUT  SUMMARY 


A-l.  PARTS  DATA  BASE  INPUT.  The  major  portion,  in  terms  of  quantity  of 
records,  of  the  extended  PARCOM  input  data  is  the  parts  data  base.  The 
elements  shown  in  Table  A-l  must  be  input  for  each  part  type  used. 


Table  A-l.  Data  Elements  for  Each  Part  Type  in  the  Parts  Data  Base 


1.  National  stock  number  (NSN) 

2.  Unit  cost 

3.  Retail  repair  time 

4.  Depot  repair  time 

5.  Order  and  ship  time 

6.  Failure  rate 

7.  Retail  NRTS  rate 

8.  Retail  condemnation  percentage 

9.  Depot  condemnation  percentage 

10.  Item  essentiality  code 

11.  Quantity  per  application 

12.  Number  of  initial  depot  serviceables 

13.  Number  of  initial  depot  unserviceables 

14.  Number  of  initial  war  reserve  (retail)  serviceables 

15.  Number  of  initial  war  reserve  (retail) 
unserviceables 

16.  Total  parts  in  retail  ASL/PLLs  on  Day-1 

17.  Distribution  schedule  of  parts  deployed  after  Day-1 
(by  5-day  interval ) 


A-2.  CHANGES  IN  PARTS  DATA  BASE  INPUT.  Extended  PARCOM  shares  elements 
(1)  through  (11)  of  Table  A-l  with  basic  PARCOM.  However,  while  basic 
PARCOM  at  Day  1  emplaces  in  the  theater  all  the  available  for  each  part, 
stock,  extended  PARCOM  allows  for  distribution  of  that  stock  over  time, 
through  the  inclusion  of  the  additional  data  elements  (12)  through  (17). 

A-3.  SCENARIO  DATA  BASE  INPUT.  In  addition  to  the  parts  data  base, 
extended  PARCOM  inputs  the  scenario  data  listed  in  Table  A-2. 

A-4.  CHANGES  IN  SCENARIO  DATA  BASE  INPUT.  Relative  to  the  parts  data  base 
used  in  basic  PARCOM,  the  extended  PARCOM  includes  essentially  all  basic 
PARCOM  scenario  input,  but  adds  the  following  data/capabilities: 

a.  Depot  distribution  and  lag  times.  All  basic  PARCOM  parts  were  front 
loaded. 


b.  Partial-substitution  policy  specification. 


A-l 


CAA-TP-84-11 


c.  Options  to  specify  the  list  order  of  part  requirements.  Basic 
PARCOM  listed  requirements  only  in  order  of  decreasing  part  unit  cost. 

d.  Options  to  do  only  a  capability  assessment  of  current  inventory 
under  several  different  partial-substitution  policies.  Basic  PARCOM  did  a 
current  inventory  capability  assessment  only  for  a  no-substitution  policy. 


Table  A-2.  Data  Elements  for  the  Scenario  Data  Base 


Scenario  Specification  Data 

•  Case  identifier 

•  Length  of  war 

•  Flying  program 

•  Aircraft  deployment  schedule 

•  Aircraft  losses 

Scenario  Constraint  Data 

•  Cost  limit  (for  constrained  cost) 

•  Aircraft  availability  constraints  (minimum  daily  availability) 

•  Maximum  flying  hours  per  aircraft  per  day 

Additional  Parts  Data 

•  Order  ship  time  offset 

t  Maximum  essentiality  code  for  part  to  be  processed 
t  Lag  time  before  initial  depot  serviceables  are  sent  to  retail 

•  Duration  of  time  required  to  distribute  initial  depot  serviceables  to  retail 

Part  Replacement  Policy  Specification  Data  for  Requirement  Calculations 

•  (1st  Option)  Number  of  parts  in  full-sub  parts  set  and  the  part  numbers  of  the 
parts  designated  as  full-sub 

•  (2nd  Option)  Screening  limits  on  depot  cycle  time,  NRTS  rate,  retail  repair  time, 
and  failure  rate.  A  part  type  with  parameters  exceeding  any  screening  limit  is 
selected  for  the  full-sub  set. 

Part  Replacement  Policy  Specification  for  Current  Inventory  Capability  Assessment 

•  Number  of  parts  in  each  full-sub  parts  set  and  the  part  numbers  of  parts 
designated  full  sub 

Print/Ca leu late  Options 

•  Options  to  print  various  input/output  lists 

•  Options  to  omit  requirements  calculations  and  only  do  capability  assessment  of 
current  inventory 

•  Option  to  select  the  order  in  which  part  requirements  are  listed  in  output--ei ther 
by  decreasing  part  unit  cost  or  by  decreasing  amount  of  requirement 

Tuning  Parameters 

•  Desired  closeness  of  "flying  hours  flown"  convergence  during  capability  assessment 

•  Maximum  number  of  iterations  used  to  calculate  "flying  hours  flown"  during 
capability  assessment 

•  Increment  step  size  used  during  partial-substitution  requirements  calculations 
Miscellaneous 

•  Designation  of  (up  to  100)  part  types  for  which  cumulative  requirements  through 
each  scenario  day  will  be  listed 
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APPENDIX  B 

EXTENDED  PARCOM  -  PROGRAM  SOURCE  CODE 


MAIN  PROGRAM 


SUBROUTINE  CCCAP 


SUBROUTINE  CCLIST 


SUBROUTINE  NCRNC 


SUBROUTINE  UCCAP 


SUBROUTINE  UCRQRS 


FUNCTION  MAXC 


FUNCTION  SR 


SUBROUTINE  DIST 


pages  B-3  thru  B- 11 


pages  B-13  thru  B-14 


page  B-15 


page  B-17 


pages  B-19  thru  B-20 


pages  B-21  thru  B-23 


page  B-25 


page  B-27 


page  B-29 
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(NOT  USED) 


B-2 
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1* 
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25 

26 

27 

28 

29 

30 

n 

33 

3* 

35 

36 

37 

38 

39 

*0 

*1 
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*3 

44 
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MAIN  PROGRAM 


NAME;  PARCOM-X  TYPE:  MAIN  PROGRAM 


WRITTEN  BY:  WALTE*  B AUK AN/ AUTPVON  -295-1662 

AT;  US  ARMY  CAA/812D  VOCDMONT  A V E , B E THE  SO  A  ,  *0  20814 

PURPOSE:  THE  PAPCOM-X  (PARTS  REQUIREMENTS  A*0  COST  NOPEL-fXTENDEDi  IS  USED 
TO  GENERATE  COST  EFFECTIVE  MITES  OF  SPARE  PARTS  RECU1RE0  TO  ACHIEVE  A 
FLYING  PROGRAM/ AVAILABILITY  OBJECTIVE  UNDER  A  USE  R-SP  E  CIF IE  0 

-PART  REPLACEMENT  POLICY  f  E IT  HER  EULL*PIRTIAL  OR  NO  SUBSTITUTION! 

- f  PURCHASE  I  COST  CONSTRAINT 

IN  AOO I T I ON  9  THE  PROGRAM  ALLOWS  THE  CAPABILITY  ASSESSMENT  OF  AN  AIRCRAFT 
FLEET  BASEO  ON  A  USER-SPEC IrIEO  SPARES  INVENTORY  APPLIEO  UNDER  A 
VARIETY  OF  USER -SPECIFIED  PARTS  REPLACEMENT  POLICIES 

ARGUMENTS:  NOT  APPLICABLE 


CALLEO  BY:  NOT  APPLICABLE 
CALLS 


-SUBROUTINE  MIXC:  ORDER?  PART  TYPES  IN 
-SUBROUTINE  CCCIP;  PERFORMS  A  FLEET  CAP 
A  EPARFS  STOCK  EQUAL 
A  NO /OR  CURRENT  INVEN 
-SUBROUTINE  CLIST:  PRINTS  SELECTED  CONS 
-SUBROUTINE  DIST;  DISTRIBUTES  PARTS  TO 
-SUBROUTINE  UCRGPS:  COMPUTES  A  COST -EFF 

04  T  Hr  UNCONSTRAINE 
-SUBROUTINE  UCCAP:  COMPUTES  FLEET  C  A  F  A  B 
ON  THE  UNCONSTRAINED 


DECREASING  OPOEP  OF  UNIT  COST 
ABILITY  ASSESSMENT  BASEO  ON 
TO  THE  CONSTRAINED  COST  SOLUTION 
TORY 

TRAINED  COST  SOLUTIONS 
THEATER  OVER  5-CAY  INTERVALS 
ECTIVE  REQUIREMENTS  MIX  BASED 
0  fOST  SOLUTION  BEING  SToCKEO 
ILITY  ASSESSMENT  BASED 
COST  SOLUTION  BEIN6  STOCKEO 


FILES  USED 


INPUT  -  UNIT 
-  UNIT 

OUTPUT  -  UNIT 


(PARTS  OATA I 
(SCENARIO  DATA  I 
(PRINT! 


IDO 


20D 


300 


DIMENSION 

♦  AL  R  ( 120  I  9 

♦  DC ( 3D0  !  , 

♦  ID  AY ( 6 1  9  t 

♦  PT ( 24 !  | 

♦  ZLO$S( 6  1 !  t 
COMMON 

♦  AC  f 120  1  • 

♦  ALL  OwB ( 1 20 1 

♦  AVM (120  1» 

♦  CDMCA ( 300  1 1 

♦  CNCS4300!, 

♦  DC  OS TF ( 1201 

♦  000(3001, 

♦  FHR ( 120  1  , 

♦  IF  S  ( 300  !  , 

♦  IP  T (100  1  * 

4  NP 

♦  PT6EP(300, 

♦  SM ( 120 , 1  DO 

♦  TRN  CS ( 3  00 1 1 
CHAR  AC  TER* 1 6 

♦  ADESC. 

♦  CLASS! 300 1 i 
I  SHORT  =0 

I F  CC -1 

00  100  1=1,2 
IDCC ( I ! =0 
00  200  1=1,61 
1 0  AY ( I ) =0 
A  VM ( I  1=0. 

N A  C ( I  !=0 
NF  H ( I  1  =  0 
?LOSS(I>=0 
A  M ( I  1=0. 

00  300  1=1,300 
I F  S ( I  1  =  0 
I  NS  C 1 1 =0 

zz=o. 

KN  TC  =1 

RE  A  0  (11,90001 
N  P  =  0 
NP  1  =  0 

READ  (11,9100! 
IF  (NFS.LT.01 
IF  (NFS.LE.01 


2*1* 

It 


AM ( S 1  1  , 

OSEPf 3noi, 
NA^(f I  1. 

wres( Srfii, 

ZN*T  ( 300  1 

AMSj5(3P01, 
BCY (300!  , 

CF( 3001, 
C0ST(3rol, 
OCY (70P»  , 

FHA (12P! , 
ICOST, 

IHSEL. 

IRC (30C 
NP  1  . 

OPA (3001 , 
SR*AXl (3001 , 
TSTk ( 300 1 , 

AOS  C  , 

Z1 


9 


B  C ( TOO  1 , 
DUNSE  P(300! 
NF  H ( 6  I  1  * 

WR ESU ( 300  I , 


immi: 

BF (3001, 

CL, 

CRNCS (3001, 
DF (3001, 
FHM. 

I0CCI21, 

IN S( 3001, 

1 R  0 ( 300 1  , 

NP  2  , 

RNCI 1 201 , 

ST  K ( 3  001  , 
TSUMB 

AH  SN  t 


D A  Yl 0 ( 300 1  , 
FR  (300  1. 
0STC3OQ! . 
XRNCS (3001 , 


ALLOW! (1201, 

AY AV6(6lt 
CASE, 

CM  IN T  • 

PC  OS  T 1  (3001, 
DMP! 300! , 
FHPAPD(3,1201, 
I F  HC ( 1 20  1  , 

INT. 

ISHORT , 

NW  , 

RN  CS ( 3  00 1  , 

SU  MB ( 1 20 1  a 


CASE  , 


AOOOST,CONVF ,1E SS ,0LA6 ,0 OIS 
NFS 

READ  (11  ,9200!  ZDC Y ,2N R TL  ,BRE PL  ,FRL I M 
GO  TO  430 
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82 

83 

89 

85 

86 

87 

88 
89 
9D 

91 

92 

93 
9k 

95 

96 

97 

98 

99 
100 
101 
102 
103 
109 

105 

106 

107 

108 

109 

110 
111 
112 
1  13 

119 
115 
1  16 
1  17 
1  18 
1  19 

120 
121 
122 
123 
129 

ill 

127 
1  28 
129 
1  30 

ui 

133 

139 

135 

136 

137 

138 
1  39 
190 

III 

193 

199 

195 

196 

197 

198 
1  99 
150 
1  51 

152 

153 
159 
1  55 

156 

157 

158 

159 
I  60 
161 
162 
163 


<IFS<J1 f  Jr  1 f  NF  S  1 
<IFS<J1 ,J=1,NF$1 
CASE 


RE  AO  <11,91001 
WRITE  <6,91001 
900  READ  <11,93001 
READ  <ir,9900l 
1=0 

500  READ  <lC,9500tENO  =  l30?l  2 ? , Z2 , Z 3 . 29 , 25 , 76 , Z 7 1 Z8 ,Z 9 , IE S , IN  I T 
READ  I 1C,9600,END  =  1  303  1  D SR  V, D UN  $ , WR S , W RU , 0  At  1 
READ  lir,970C,EN0=l3n2!  iCPA 
READ  Cir^^OtENOrlSGl)  AOSC 
READ  <  1C, 9900, E*0  =  1  303)  < pT <K 1  ,  K  =  1 , 29 1 


RE  A  0  <1^.990015^0  =  1300  1 
JF_<IES.6T^|E5S)  GO  TO  700 


2X0=2. *ZT*27 
22C=22/ 100 • 

295=79/1000000. 

Z  5  K -25 /  100 . 

ZlOC=ICPA 

286=28/100. 

290=29/100. 

IF  <HOO<NP^I,50 1 .nE  .0)  GO  TO  600 
WRITE  <6,100001  CASE 
WRITE  <6,101001 
WRITE  <  6 , 1 Q  200 1 
WRITE  <6,103001 

600  IF  <29  .GE. .0000001  1  GC  TO  800 

700  WRITE  <6,109001  2 1  f  AOS  C  ,Z  **C  ,2  3  ,29F  ,  2  5N  ,  26 , 2  XO  ,27  f  2g  0 , 7  90 , 2  1 00  , 1 E  $ 
1=IM 
GO  TO  500 
800  NP=NP« l 

STK  <  NP 1=WRS*0AY 1 
BC T  <  NP  1 =26 
OC Y  <  NP 1 =0. 

IF  I2SN.GT.0.1  0CY<NPl=2Xr 
2NRT  <NP  l  =  Z5N 
rLASSlNPl=«  NO  SUB* 

IF  <NFS.6E.01  60  TO  990 
CLASS<NF 1  =  • FULL  SUB  * 

IF  iBCY  <NP  1  .LE.6RFPL.IND.PCYINP 1 .LE . 70C Y . AN C . 79F . LE .FRLIM . AND • 2NR  T 
♦<NPl.LE.ZNRTLl  CLASSINP1=«  NO  SUB* 

GO  TO  1100 

9C0  IF  INFS. EC. 01  GO  TO  11  DO 
00  1000  L  =  1 *NF S 

IF  <irS<L  l.NE.NPl  GO  TO  1000 
CLASS <NPl=fFULL  SUB* 

GO  TO  1100 

icon  continuf 

1100  WRITE  <6,105001  NP. 71 , ADSC ,22C ,23, 29F ,Z 5N,26, 7X0, 27 ,2 BB tZ90 ,21 00 ,1 
♦  ES,CLASS<NP  1,STK<NP  ) 

OST<NP!=ZT 
A  MSN  <  NP  1=21 
COST  <NP  1  =  Z2C 
F R  < NP 1 =29F 
BC  <NP1 =Z8B 
DC  <  NP 1 =Z90 
QPA  <NP 1=2100 
AOESC<NP1=AOSC 
dser  <NP  1=0SRV 
CUNSER  <NP 1  =  0UNS 
WPES  <NP 1 =VR S 
WRESU<NP1=WRU 
OA Y1D(NP1=0AY1 
00  1200  L=1 ,29 

1200  PTOEP<NP.l  1ZPTILI 
■"  - ►.GE.O.C*  — 


OR.ClASSINPl .eQ, 


NO  SUB *  1  GO  TO  500 


IF  <  NF  S 
NP 1 =NP 1 *1 
I FS  <  NP 1 t  =  WP 
60  TO  500 
1300  II=NP*I 

IF  <NFS. GE. 01  NPlrNFS 
WRITE  <6,106001  II, NP 
R  E  A  0  1  11,107001  CLNCR.CLNFT  ,LIMIT 

READ  <  11,108001  FHM,NW ,ISEL,IOROtIOPTl , IOPT 2 , I  OPT  3, I0PT9 , 1 OPT  5 , I PR 
♦T.IPRT  1  ,INT 

IF  <NP1 .EO-O.OR .IPRTI.LF.PI  GO  TO  1500 
DO  19D0  1  =  1  ,NP 1 
II=IFSII1 

IF  IHOOfl-l.SOl.NE.D!  60  TO  1900 
WRITE  <6,100001  CASE 
WRITF  <6,109001  KNTC 
WRITE  <6,  102001 
WRITE  <6,103001 
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16* 
1  65 

m 
166 
1  69 

170 

171 
I  7? 
173 
17* 
1  75 
1  76 
177 
176 
I  79 
1  80 
181 
1  8? 
183 
1  8* 
185 

H6t 

188 

189 

190 

191 
19? 

1  93 
19* 

195 

196 

197 

198 

199 

2  OC 
?U1 
?D? 
?03 
?0* 
?D5 
2U6 
?  07 
?08 
209 
?1C 
?11 
?1? 
?  1  3 
?1* 

ill 

2  17 

III 
22 1 
??? 

if? 

?  25 
2  ?6 

227 

228 

229 

230 

231 

232 

233 

nt 

2  36 
2  37 
236 
2  39 

?*r 

2*1 

2*2 

2*3 

?** 

2*5 


1  *  DO  WRITE  ( 6  v 1 1  ODD )  I T , AM5 N ( 1 T I , IDE SC  ( II 1 • C OST ( II 1 ,FR Cl  1 1 , ZNR T C 1 1  I f B CT 

♦  I  II 1.0 CYC  II  I, PCI  III ,DC( II ),STK 1111 
1500  N'P?  =0 

DO  1600  Kri .NP 

IF  (Nri.EC.C)  60  TO  1700 
00  16DD  1=1, NP1 

IF  UFSm.EQ.KI  60  TO  160D 
160D  CONTINUE 
1700  KP2=NP2*1 

INSfNP21-K 
160D  CONTINUF 

IF  (NP2.C0.0.0R.IPRT1.LE.C)  GO  TO  2DD0 
DO  1900  1=1 t NP2 
1 1  - 1  N  S  ( I  1 

IF  crooc 1-1,501 .NE.O>  GO  TO  19D0 
WRITE  (6,10000)  CASE 
WRITE  (6,11100)  KNTC 
WRITE  (6.1D20D) 

WRITE  (6,10300) 

19G0  WRITE  (6, 11 200)  1 1 , AM$N (I I ) .ADESC ( II ) , COST ( II ) ,FR ( 1 1 ) , 2NRT ( II ) , BCT 
♦(II ) ,OCY( II  )  ,8C (II) ,DC (II ) ,STK (II ) 

2D00  R  E  AO  (11,9100)  NACOEP 

READ  (11, 91  DO)  (  10A  Y(I  ),in  ,NACDEP) 

READ  (  1  1  • 9 1  DO  )  (NAC(I) ,f  =  1,NACDEPI 
DO  2200  1=1 fNACDEP 
K  1  =1  D  AY  (  I  ) 

K2=1DAY(IM  t-1 

IF  ( 1  .EG. NACOEP)  K?  =  NW 

00  2iro  J=K 1 ,82 

2  10D  A C ( J ) =N  A C  (  I  ) 

2200  CONTINUE 

READ  (llf91D0)  NFHOAY 

RE AC  (11,9100)  (10AY(T ),lrl fNFHOAY) 

READ  (11,9100)  (NFH( I) ,1=1, NFHOAY) 

DO  2 *D C  1  =  1  .NFHDA Y 
K 1 =1 P  AY (I  ) 

K2  =  ir  ay  ( i  <*1  )-i 

IF  ( I .EO* NFHDAY )  K2- NW 
00  2 3 CO  J=KI,K2 
FH A  (JlrNFHI  I) 

2300  FHR( J)=NFH(  I) 

2*1  OC  CONTINUE 

R  E  A  0  (11,91 r0)  NLPAY 
R  E  A  0  (11,91 CC)  ( I D A  Y( I  1,1  =  1, NtDAY) 

RE  10  ( 1 1,1 1 30C )  (ZLOSS (1 ) , I =1 , NLOA Y ) 

DO  ?60C  1  =  1  .NLDAY 
K  1  =  I  C  AY  (  I  ) 

K?=IDAY(  I  ♦!  )  — 1 
IF  (I.EQ.NlOAY)  K  ?  =  *  W 
00  2500  J=K1,K2 
250D  AL  R ( J )  =  ZL  OSS ( I  ) 

2600  CONTINUE 

READ  (11, 91  CO)  NMD A  Y 
READ  (11,91  PO)  (IOAY(I).lri ,NMOAY) 

-  (11,11*00)  ( AH (I) ,1= 1 ,NHOAY) 


R  E  A  0  111,11*00)  (J 

‘’“KnfB.Tiii""0" 


k2=icay  ti«n-i 

IF  1 1  .EQ.NW0AT1  R2=9W 
DO  27CD  J=K1,K2 
2700  tVHIJCtHlI] 

2600  CONTINUE 

READ  (11,91001  INSEL 
RE AO  (11.91001  (IPI (KT.K=l,I«SEtl 
IF  IIPRTI.LE.OI  60  TO  33DD 
2C0ST=0. 

00  3000  K  =  1 ,NP 
SUH=0 . 

00  2 9 CD  1=1 ,29 
2900  SU*=SUM«PT0EPIK,1 j 

SUHT  =  SUN«OSER  IK  1  ♦PURSER  (K  1*  (  1.-DCIK1  1  «WRES(  K  j.DAT  10  (K  J*C1  .-2NRT  I 

♦  K))*UFESUIK)*(l.-eC(RI) «2NRT (K)*WQESU(K)*(1 .-CCIR 1 1 
2C0ST=2C0ST«SUHT*C0ST IR 1 

IF  (HOOIK-1 ,51 l.NE.D)  6P  TO  30DD 

WRITE  16,100001  CASE 

WRITE  16,115001 

WP1TE  (6,101001 

WRITE  (6,116001 

WRITE  (6,10300) 

3DD0  WRITE  K.117DD)  R ,K . A" SN I R 1 ,»DE SC « K 1 ,C0 ST  I K ) , CL ASS  I K I ,DSEP ( R1 ,OUNS 

♦  ER  (R  l.VPESIM  .WRESU  IK  I  , 0 A  V 1 0 1  K  )  , SUM  ,SU* T 
00  32D0  K  =  1  ,N£ 
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246 

IF  IHC0(  IK-1J  ♦  3,6?I.Nt.'"|  GO  TO  3100 

247 

WRITE:  (6*  100001  casi 

248 

WRITE  (6*118001 

249 

WRITE  (6*119001 

250 

WRITE  (6,120001 

WRITE  (6*103001 

251 

252 

3100 

WRITE  (6,121001  K  .A^SMKI  f ADCSCfK) 
WRITE  (6,122001  (PTOEP(K  ft 1 ,Lrlf 24) 

QO  3500  lUl.NP 

IFOA YrOLAG*l 

253 

254 

255 

§188 

256 

ILDAY=OLAG*COIS 

m 

camt^cser  (K  1/OOIS 

CALL  01 S  T  (IFOAYtILDAYtrAMT#IU 

2  59 

IFOAYrOST  (K  Ml. 

260 

CREP-TCY ( K 1 -2**0ST(A) 

ii\ 

IF  I CCEP  *LT • 1 • 1  OREp-1.000 

ILOAY=OST  (KMOREP 

263 

OAMTr((l.-Or(KJ 14  0UNSER  fK  11 /OREP 

264 

ill 

CALL  01 S  T  (IFDAY#lL"AYfPAMT.Kl 
A«T=(I.-2NRT(Kl MURE  SU IK 1*1 I.-8C(K1) 

I F  OA Y -1 

267 

IF  IBfYfK  l.LT.l.J  BCYIK)=l. 

268 

ILOA Y-BCY  (K) 

269 

CAMT-IHT/BCY(K1 

270 

CALL  OIST  (IFOAY*  I L !)  A  Y  f  0  AMT  *  K  1 

271 

APT  =  ZNRT  (KMWRESU  (KJ*(  I  .-OC(Kl) 

2  72 

TFOA Y=1 .♦2.40ST (K 1 

273 

ILOI Yr2.40ST(K  MOREP 

2  74 

CAMTz AMT/PREP 

275 

. 

CALL  OIST  (IFOAY, lL01Y*rAHTfKl 

IF  (IPRT1 «LE«0)  GO  TO  3500 

IF  (  HOD  ( (K-l 1*3,601 #NE .01  60  TO  3400 
WRITE  (6,10030)  CASE 

2  78 

279 

WRITE  (6,123001 

280 

WRITE  (6,11900) 

WRITE  (6,12000) 

281 

282 

283 

3400 

WRITE  ( 6  ,  lc 3no 1 

IF  (OCY(K  l.GE . .00 01. OP. P AMT. LE.. 031 1 

WRITE 

284 

♦  OE  SC ( 8 ) 

285 

IF  I  DC  Y  ( A  1  .LT  ..OOOl.lKD  *0  AM  T  .fjT.OOl) 

WRITE 

286 

♦  0  E  SC  (  K  i 

287 

WRITE  16,122001  4  PTOC*M  *  ,D  ,L  =  1 ,24  | 

28e 

3500 

CONTINUE 

289 

IF  (IPRT.LE.O)  60  TO  38C0 

290 

00  3700  J=1 ,N V 

m 

293 

IF  4P00I J-I.Sl) .NC.O)  60  TO  3600 

WRITE  le>,10P001  CASE 

WRITE  f6-  12500  1 

294 

WRITE  (6,12600>  ADDOST.CONVF .LIMIT, IESS 

295 

296 

WRITE  ( 6  « 1 27C0  1  FHM.CLNCR ,CLNCT 

WRITE  ( 6  , 12600 I  ZCOJT 

297 

WRITE  (6,129nni 

WRITE  1 6  •  1 3CuO I 

298 

299 

3600 

c»lr=c»lr*»lr  ( J1 

300 

301 

3700 

3800 

WRITE  (6,131001  J,AC«JI.FHR«JI  .AVMJI, 
WRITE  (6.1000C1  CASE 

*L«( J1 

302 

WRITE  (£.132001 

303 

IF  (ISEL. EC. 01  WRITE  (6,1t3001  ISEL 

304 

IF  (ISEl.EO.n  WRITE  ( 6 . 1 39 00 I  ISEL 

305 

306 

IF  (ISEL.EQ.21  WRITE  (6,135001  ISEL 

IF  (NFS.LT.O)  WRITE  (6  , 136001  NFS . 20CY 

, 2NR  T  L 

3  07 

IF  (NFS.GE.P1  WRITE  (StlS^OO)  NFS 

308 

IF  (I0PD.LE.01  WRITE  (6.13B00)  TORO 

3  09 

IF  (IORC'GT.Ol  WRITE  (6.1»9001  IORO 

310 

m 

IF  (IOPTl.LE.Pl  WPITE  (£.190001  I0PT1 
IF  (I0FT1.6T.CI  WPITE  (6,191001  I0PT1 
IF  (I0PTP.LE.01  WPITE  (6,192001  I0PT2 

313 

IF  (I0FT2.GT.01  WPITE  (6,193001  I0PT2 

314 

IF  (I0PT3.LE.0l  WRITE  (6,199001  I0PT3 

3  IS 

IF  (I0PT3.GT.01  WRITE  (6.19S001  IOPT  3 
IF  (I0FT9.LE.C1  WPITE  (6,196001  I0PT9 
IF  (IOFT9.GT.01  WRITE  (6,197001  I0PT9 

316 

317 

318 

IF  (I0PTS.LE.01  WRITE  (6,198001  I0PT5 

319 

IF  (I0PTS.GT.01  WPITE  (6,199001  I0PT5 
IF  (IPP1.LE.01  WRITE  (6,160001  IPRT 

3  20 

321 

IF  (IpPT.GT.Ol  WRITE  (6.ISI001  IPRT 

IF  (IPRT1.LE.D1  WRITE  (6.1S20C1  IPRTI 

322 

323 

IF  (IPRTI. 6T. 01  WPITE  (6,153001  IPRTI 

324 

WRITE  (6, IS 9001  1NT  ,INT 

m 

39?0 

BcosJ?f?i}^:nu 

327 

DO  4000  1  =  1  , NP 

(6,129001  K,*HSN(K1,A 
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328 

329 

330 

331 

332 

333 
33* 

335 

336 

337 

338 

339 
3*0 
3*1 
3*2 
3*3 
3** 
3*5 
3*6 
3*7 
3*8 
3*9 
3  50 

351 

352 
3  S3 
35* 

355 

356 

357 

358 

359 

360 

361 

362 

363 
36* 

365 

366 

367 

368 

369 

370 

m 

373 
3  7* 

375 

376 
3  77 

378 

379 

380 

381 

382 

li 

385 
3  86 

387 

388 

389 

390 

391 

392 

393 
39* 

395 

396 

397 

398 
3  99 
*00 
*01 
*02 

:8<3 

*os 

*06 

*07 

*08 

*09 


III 


*000  D00(II=CDST<II 
KNT=0 
NPUNMY=FP 
00  *300  K  =  1 #NP 

CALL  HA  XC  <  NDUHNY  tNOUT 1 

IRCCK  1-NOUT 

II=IPC<K1 

IF  <Nn.LE.0l  GO  TO  *200 
00  *  100  L  -  1 t  NP1 

IF  <IFS <LI.EQ.II1  60  TO  *300 
*100  CONTINUE 
*200  K  N  T  =  K  FT ♦  1 

iNSirr  ti  =  ii 

*300  DOO(IIi:-l. 

IF  <IPPT1.LE.C1  60  TO  *600 
OD  *500  K  =  1 fNP 
1 1 =1  PC <  K I 
SUM=0. 

DO  **00  1-1.2* 

**C0  SUHrSl'H^PTDEP  <11.  II 

SUNT=SUH*OSER  < 1 1 1 ♦CUNF EP < II I  * <1 .-0C < 1 1 1 1 « UR ES U I > *0 AY  10 < 11 >  +  < 1 •* 
♦  ZNRTC II  I  I 9WRCSUI IZ»t( 1.-BCCI1 » >*2NRT  <III*WRESU<II  >*  <  1 .-DC  <111 1 
IF  <HCO <K-1 . 5 1 ) .NC.O I  60  TO  *500 
WRITE  <6, 1000C1  CASE 
WRITE  (  6  v  IS  500  1 
WRITE  <  6  «  11S001 
WRITE  <  6  «  1 1 600 1 
WRITE  <6.103001 

*500  WRITE  <  6, 11 700 )  K  •  I T  t  A  MSN  fill .AOESC f II  1  .COST < II  I .CL  ASS  < II  I , OSER  < II 
♦I . DUNSE  P  < 1 1  I.WRESll 1 J . WRE^U  <111 ,0AY10<I1>.SUH ,SUHT 
*600  CALR=0. 

WRITE  <6.156001 
DO  *700  1=1 VN V 
CALR=CALR^ALR<I 1 
ASURV ( 1 1  =  AC  < I 1 -CAL  R 
XX  =A  H  IX  1  <0.«ASljRV  <  1 1  *  <  1  .-AVH4I1I1 
YY-AHAXl <0. .ASURV  <I> -FHP< I I /FHH  I 
ALLOWr<l>=AHINl<XX»Tf» 

IF  < ALLCWB  < 1 1 .EC.YY?  IFHC<I»=0 
IF  < ALL0WE<I1 .EO.XX)  IFHCCII=l 
*700  CONTINUE 

TTFH=0. 000001 
00  *800  1  =  1  •  N W 
*800  TTFH=TTFH^FHR <1 1 
OO  *900  J=1 ,NP 

CF<  Jl=f  R<  J1*0PA  <  J1 

8 F I J I =<  1  . -BC< Jll*  <1.-2NPT <J I  l*CF< J| 

OF  < Jl  =  < I. -0C< J1 I*  <2"RT<  Jl >  *CF  <  J 1 
*900  CONTINUE 

IF  <I0PTI.LE.01  60  TO  7600 
I  NO  1  =1 
IND2  =2 

IF  <ISEL.EQ.21  60  TO  'OCO 

1N0 1=1 ♦ISEL 

IN02=1*1SEL 

5000  00  7500  IN0=IN01 # IN02 
ACL=0. 

CL  =CL  NCT 
I  COS  T  =0 

IF  <IN0.E0.2I  CL  =  CL  NCR 

CALL  UCROPS  < INO.IOPT*, TOPT5,IOR01 

CALL  UCCAP  < I  NO  I 

IF  <CL.LE.0.1  60  TO  7500 

I  W  =N  W 

UCN$  =0. 

FR  AC  1  =0  • 

IF  INFj.EC.Ol  GO  TO  660" 

DO  5100  J=l ,NP2 
11  =  INS  <J1 

5100  UCNS=UCNS«COST <11 >*rNCS<III 
WRITE  <  6  v  100D0  )  CASE 
WRITE  <  6 . 1 S  700 ) 

DO  5200  J=1 ,NP 
S  200  TRNCS <J1  =  PNCS < JI 

CL1=CL 

CNC=CHINT-CL 

IF  <  CFC.6T.0. I  60  T 9  53T0 
IF  <IND.E0.1I  WRITE  <fc,lS8001 
IF  < IND.E0.21  WRITE  <6,159001 
60  TO  7SQ0 

5300  IF  ICNC.GT.OCOSTl INWI1  60  TO  5*00 
CL  1  =  UCN  S 
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410 

CL2rCl-CLl 

4  11 

SO  TC  5900 

4  12 

54C0 

IF  (KP1.CQ.0)  SO  TO  560P 

*13 

00  5500  jri.NPl 

*  1* 

iirirsi J» 

*  15 

5500 

TRNCS C1I 1=0. 

416 

5600 

CL2=0  • 

*17 

CL1=CI-CL2 

cnc=ucns-cli 

4  18 

4  19 

00  5  FCO  J=1,NP2 

420 

1 1  =  INS  1 Jl 

*21 

C  =  TFKCS  CIU*CCSTCTI  1 

422 

IF  CC.LT.CNC)  SO  TO  5700 

*23 

TRNCSC  II»  =  TRNCS  Cl  I  l-CKC/COST Cl I ) 

42* 

IW  =  NU 

425 

GO  TO  6200 

426 

5700 

TRNCSCIITrO. 

*27 

CNC=CNC-C 

COM  1 60S 

*28 

5800 

*29 

SO  TO  6100 

*30 

5900 

I FCC= 1 

*31 

00  6000  I =1 ,MU 

*32 

IF  CDCOSTl 1 I » .6T.CL2I  60  TO  6000 

U 3  IF  CC-I 

*34  BCL=OC  0  ST  1  III 

435  6000  CONTINUE 

436  WRITE  (6.16P00) 

4  37  6100  IF  ICL2.6F.OCOST1  INWII  WRITE  16*161001 

*38  IF  ICl 2.LT.0C0ST1 <KW1  I  WRITE  (6,162001  CL2,BCl,IFCC 

*3°  I  W =NW 

440  NwrIFCC 

441  CALL  I'CRQPS  IIWO.IORT*  #T0PT5  ,I0R01 

* *2  6200  WRITE  (6,16300)  CL.CLl 

*43  IF  ( CL2.LE. .0001 1  W&ITE  (6,16*00) 

*44  N  W  =1 W 


*  *5 

*  *6 

*47 

4*8 

*49 

*50 

*51 

452 

*  53 
*5* 
*55 
*56 

457 

458 

*  59 
*60 

*  61 
*62 
463 
*64 
465 
*66 
*67 
*68 
*69 
470 
4  7l 

*  7$ 
*73 
*7* 
*75 

*  76 
*77 

*  78 
4  79 
*80 
*81 
*82 
483 
48* 
*85 
*86 
*87 
*88 
*89 
*90 
*91 


00  6300  I=1*NP2 
1 1 = INS ( I ) 

6300  RNCS ( II I-TRnCSI II) 

00  6400  1=1  .NF 
6*00  TPNCSII )=RNCS(I) 

TO  T=0  • 

00  6 5 CO  I=1,RP 

T0T  =  T0T4C6ST( I  I ♦R4CE ( T) 

6  500  RNCS (II=R SCSI  I MSTHf i!MIN0“11 

IP=0 

CALL  CCCAP  (INO, LIMIT, CrNV$TTFH,KNTC, IP, FNC) 
FRAC1=FNC 

WR  I T  F  (6,16500)  FPAC1 

6600  IF  IIPCcCINOI.LE.  l.OR.irCCllNOl.BE.NW)  GO  TO  ?S00 
NWrlCCCdNO) 

00  6  7C0  I =1 ,NV 
6700  FH A ( I  )rFHR(f) 

CALL  UCRQPS  I iNOtlOPT*, I0PT5,I0R0> 

00  6 8 TO  J  =  1,NP 
XRNCS( J)=PNCS( J) 

Nwrlw 

IP=C 

6  800  RNCS  (JI=RNCS(  JMSTXf  Jl#  (INO-1  1 

CALL  CCCAP  (INO  fLIMT  T  ,CONVF  f  TTFH.KNTC  ,IP  ,FNC) 
FRAC2=FNC 

WRITE  (6,16600)  F PA C 2 
IF  (FPaCI  .LE.FRAC2)  SO  TO  7100 
00  6 9 CD  J=lfNP 
6900  RNCS I JI=TPNCsI J) 

I G  =  1 
ACL=TOT 

CALL  CCLIST  ( I  6 f I ORP  ,1 NO ) 

00  7000  Jrl-NP 

7000  RNCS(J1=TRNCSIJ)*ST* (J)*|IN0-1 ) 

IP  =  1 

CALL  CCCAP  (IND, LIMIT, cCNVF,TTFH,4NTC, IP, FnC) 

60  TO  7400 
7100  I G  =2 

00  7200  J=1 , NP 
7200  RNCS (Jl =X RNCS! J) 

CALL  CCLIST  ( IS ,1 0Rn  ,INO  ) 

00  7300  J=1.NP 

7300  RNCS ( Jl =XRNcS ( J )♦ STK I J)*( IN 0-1 ) 

IP  =  1 

CALL  CCCAP  IINO, LIMIT, CON¥F,TTFH,KNTC, IP, FNCI 
7*00  NW-IW 
7500  I  COS T-C 
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*  92 
9  93 
9  99 
995 
9  96 
9  97 
998 
9  99 
500 
5Q] 

502 

503 
509 

505 

506 

507 

508 

509 
SIC 

511 

512 

513 
519 

515 

516 

517 

518 

519 

520 

521 

522 

523 
529 
5  25 
5  26 

527 

528 

529 

530 

531 

532 
5  33 
539 

535 

536 

537 

538 
5  39 

590 

591 

592 

593 
599 

595 

596 

597 

598 

599 

550 

551 

552 

553 
559 
555 
5  56 

557 

558 

559 

560 

561 

562 

563 
569 

565 

566 

567 

568 

70 

571 

572 

573 


76C0  00  7700  K=1 ,N P 
7 70C  FNCS<K1=STkCK1 
IP  =  1 
1  NO  -2 

CALL  CCCAP  CIVD  f LIMIT , CON VF  ,TTFH , KNTC ,IP ,FNC) 
K  NTC-2 

7800  00  7 9C0  K=1.NP 

RNCS ( K ) rSTK  (K  1 
1NSCK  1-0 
79C0  IFSCKirr 

PEAO  I  1  1,91001ENO=167001  NPTFS.NPTNS 
IF  C INFTFS«NPTNSI.lE.OI  GP  TO  16700 
IF  <NPTFS.LC.01  60  TO  8200 
NP  1=NPTFS 

PEAO  <11,91001  CIFSIII «I-1,NPTFS1 
NP2  =  0 

00  8100  K  —  1  ,NP 
00  8000  1=1  *  NP 1 

IF  <IFS <1 I.EQ.K 1  GO  TO  6100 
8C00  CONTINUE 
N  P  2  =  NP2 ♦ 1 
INS<NP2)=K 
8100  CONTINUE 

GO  TO  8«go 
8200  NP2=NPTf:S 


READ  <11,91001  < I  NS  <11,1  =  1, NP T NS 1 

NP  I  =0 


00 


00 


:]  ,NP 

ro  I=i,np2 

IF  4INS4II.EQ.KI  SO  TO  8*00 
8300  CONTINUE 
NPj=NPl«l 
IFSINPU=K 
8*00  CONTlNUf 

8530  IF  I 10PT2 ,LF •31  GO  TO  8700 
00  860C  1  =  1  .NP1 
1 1  =1  F  S  4 1  I 

IF  4K00 t I -1 .50 » .NE.O )  GO  TO  8600 
WRITE  16,19000  CASE 
WRITE  1 6 , 1C9CG  1  KNTC 
WRITE  16,102001 
WRITE  46,10300) 

8600  WRITE  4  6 , 1  I  OOP)  1 1 , AMS N 4 1 T ) .APE 5C 4 1 1 ) , COST  4  1 1 ) ,FR 4 1  I ) ,2  NR T 4 II ) ,8CT 
♦411  IjPCTIIl  ),BC411l,PC47II,STK4III 
6700  IF  410PT3.LE.C)  60  TO  B90P 
00  8800  1  =  1  , NP2 
II=INS4l) 

IF  4K004I-1.5C) .NE.O)  SO  TO  8800 
WRITE  46,10000  CAS? 

WRITE  46,11100  KNTC 
WRITE  46,10200) 

WRITE  46,10300! 

8600  WRITE  (6,112001  II .AMSNfIT I ,ADESC 411 1 .C0ST4II  I  ,FR 41 II ,ZNRT4 II  I ,8CT 
♦4 II I.0CY4II  I.BC4III ,0C4I1),STK4I1) 

1  N0=2 

8900  CALL  CCCAP  4IN0, LIMIT, CONVF.TTFH.KNTC, IP, FNC1 
KNTC=KNTCM 
60  TO  7800 

9000  FORMAT  4 2F 5 .2 , I S , 2F 5 . 3 ) 

9100  FORMAT  41615) 

9200  FORMAT  4F5 . 0 ,F5 . 3 ,F 5. 0 ,F1P .6) 

9300  FORMAT  41X.A16) 

9*00  TOPMAT  4//) 

9500  FORMAT  42 X, A 1 5 ,T9  .0  ,5* , F3 .0 ,F5 .0 , 5F3. 0 , 1 1 , 1  OX , IS  1 
9600  FORMAT  4/.5F6.0,/) 

9700  FORMAT  112) 

98C0  FORMAT  4A16) 

9930  FORMAT  I1PF10.0) 

10000  FORMAT  41H1  ,3CX,*CASE-  ,,H6) 

1C1P0  FORMAT  I//,*  ITEMS  RANK  OPOEREO  IN  NORMAL  INPUT  OROFR  *  ) 

10200  FORMAT  4/,*  PA R T •  ,5 X, • M'N • , 1* X . *0E SCRIP T ION  * , 7X , •  COST  OST  FAIL*,* 

♦  RT  NRTS  BCY  OCY  OUT  BCON  OCON  OPA  ESS  CLASS  INIT  STK'f 
10300  FORMAT  4/) 

10*00  FORMAT  49X,A16,2X,AI6,F8.0,F3.0,F8.6,F5.2,3F5.0,2FS.2,1X,F3.0,15,1 

♦  OX, I  10  ) 

10500  FORMAT  41X,T*,*X,A16,2X,A16,F8.0,F3.0,F8.6,Fs.2,3FS.0,2FS.2,lX,F3. 
♦0,15, IX  ,A8|F10» 1 1 

10600  FORMAT  4*  TOTAL  NR  PASTS:’,!*,’  NR  USE0=’,I*1 
10700  FORMAT  4 1 X , F 1  * . 0 , F 1 S . 0 , T5 I 
1C800  FORMAT  4 1 X , F9 . 1 , 1 5, 5X , lCI 5  I 

109C0  FORMAT  I//,*  FULL  SUB  ITEMS  FOR  POLICY’, 13) 

1  1000  FORMAT  41 X , I* , *  X , A  1 6, 2X , A  1 6 ,F 8 .0 , 3X , F8 . 6,FS .2 ,2FS . 0 ,SX , 2F5. 2 , 1 X , 1 0 
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579 

575 

576 

577 

578 

579 

580 

in 

583 

589 

585 

586 

587 

588 

589 

590 

591 
59? 
593 

599 

595 

596 

597 

598 
$99 

600 
601 
602 
603 
609 

605 

606 

607 

608 

609 

610 
6  1 1 
61? 

ill 

615 

616 

617 

618 

619 

620 
621 

III 

629 

625 

626 

627 

628 

629 

630 

ill 

6  33 
6  34 
6  35 
6  36 

637 

638 
6  34 

640 

641 
64? 

643 

644 

645 

646 

647 

648 
644 

650 

651 

652 

653 

654 

655 


CL 


♦X.’FULL  SUB’.FlO.Ol 

11100  F  CRH  A  T  (//,»  NO  SUE  ITEMS  FOR  POLICY’, 131 

11200  FOR  HAT  IIX, I4,4X,A16,2X,A16,F8.0,3X,F8.6,F5.2  .2FS.0 ,5 X  ,  2F 5 . 2 , IX  ,  10 
♦X,’  NC  SUB’.FlO.Ol 
11300  FORMAT  II6F5.II 
II400  FORMAT  (I6F5.21 
11500  FORMAT  I/.104X,’  OEPLPYEO’l 

I  I  600  format  (’  RANK  PAPT • ,’X, ’MSN*  t IPX , •DESCRIPTION’, 1 3X , ’COST • 

♦  ASS  ’  ,2X,’MSERV  PUNSR  VRSRV  WRUNS  0*  T 1  CAY  2-  TOT  nC’1 
1  1700  FORMAT  (215  .5X, A1 6, ?X, A16, IX, F14 .0, 1 X, A6,1X .SFfc.O ,2F7.01 
1  1800  FORMAT  «//,*  UNA0JUST50  PARTS  DEPLOYMENT  BY  OAY  INTERVAL’  I 

11900  FORMAT  (/,*  -5  -10  -15  -20  -25  -30  -3S  -40  -45’ 

♦,’  -50  -55  -60  -65  -70  -75  -80  -85  -90  -95’,’ 

♦  -100’ I 

12000  FORMAT  l»  -105  -110  -115  -120’ » 

(2100  FORMAT  1 15 , 2X . A  1 6  .2 X , 1 1 6 1 
1 2200  FORMAT  ( I  X  ,  20F  6 .0  I 

12300  FORMAT  (//,’  A  0 JUST  EO  (FOP  OEPOT  STKSl  PARTS  OEPLOYEO  BY  INTERVAL’ 
♦1 

12400  FORMAT  «I5.?X,A16,2X.I I6,tX.’4  WARNING*  OEPOT  UNSERV  STK  W/  OEP’,’ 

♦  OT  REPAIR  flMErO  (CMGEC  TO  I J ’ J 

12500  FORHAT  «//, 10X, ’SCENARIO  INPUT  OATA  SUMMARY’I 

12  600  FORMAT  «//,5X,*CST  OFFSETS’, F6.1,’  OAYS  PESIPED  CON VERGECE : ’ ,F5 

♦  .3,3X,’MAX  ITERATIONS:’, I’.BX, ’MAX  E SSE NTI A  LI T Y: • , I  3 1 

12700  FORMAT  I/,5X,’  MAX  FLY  HR S /A CF T/0 A Y:’ , F5. 1 ,4 X , ’ A 00 -ON  COST  LI’.’M 
♦IT:’ .F12.0.3X, ’TOTAL  UNIT  INV:0l  ROMT  COST  LIMIT:*  ,F  13  *01 
12800  FORMaT  l/,SX,‘  COST  Of  CURRENT  I NVEN TOR Y  =  * , FI  4. 01 

1Z9H0  FORMAT  l/,I3X,’CUM  AC^T  PROGRAM  MIN  REO  ACFT  CUM  ACFT’l 
1  3000  FORMAT  (7X,’0*Y  OEPLOYEO  FLY  HRS  AVAIL  L OST *  ,7X  , ’LOST  ’  ) 

1 3100  FORMAT  (SX,I5,F1I.0iFTC*0,F]0.2,F8*1,F)I.I) 

132CO  FORHAT  I//.10X,’  44**44  OPTIONS  CHOSEN  FOR  THIS  RUN  •**•**>! 

1  3300  FORMAT  «////, SX.’ISFL:’, I?t  •  ••  ONLY  THE  TOT  AL  UNIT  STK  =  0»’,’  ROM 
♦TS  ARE  COMPUTEO  IN  THIS  RUN  **’l 

1  3400  FORMAT  (////, SXj’ISEL:’, I?,*  •*  ONLY  THE  R ES IOUAL ( IN  I T  STKrCuRR’, 

♦  ’  I N  V )  ROMTS  ARE  COMPUTEO  IN  THIS  RUN  **•! 

13500  FORMAT  (////, cX,’lsEL  =  ’, IT,’  **  BOTH  THE  TOTAL  (INI  T  STKrOI  ANO” 

♦  RESIDUAL ( I  NIT  STKSCURR  INVl  RCMTS  APE  COMPUTEO  IN  THIS  RUN  4* ’ » 

13600  FORMAT  l//,5X,’NFS:’|I3,’  «*  FULL  SUB  SET  IS  CHOSEN  ACCOROING’,’ 

♦  TO  A  OEPOT  REPAIR  CYCLE  E TCEE 0 ING • ,F 1 2 . C , •  OAYS  OP  NR  T  S  ’,’EXCEEOI 
♦NG*  .Ft .3./.  15X. ’OP  RETAIL  REPAIR  TIME  E XCE EO ING • ,F e . 0  ,  ’  OR  FAILU 
♦RE  RATE  £xCEEDiNG’,F9.6» 

I37P0  FORMAT  l//,5X,’NFS:’,I3.’  4*  FULL  SU«  SET  IS  SPFClFlEO  BY  INPUT’l 

13800  FORHAT  (/ / , 5X , *  1 ORO , 1 3 , ’  ♦♦  COMPUTEO  ROMTS  LISTS  WILL  EE  IN  ’,’ 

♦OROER  OF  0ECREASIN6  UNIT  COST  OF  PART’l 
13900  FORMAT  (// , 5X , • IORD : ’ , IT , ’  **  COMPUTEO  ROMTS  LISTS  WILL  BE  IN  ’,’ 

♦oroer  cr  oe creasing  rcmt  amount  for  part’i 

I40C0  FORMAT  (// ,SX ,’IOPI  1:’ , 13, •  *•  ONLY  ASSESSMENT  CASES  WILL  BE  ’,’D 

♦ONE  IN  THIS  RUN • I 

14100  FORMAT  t//,5X,’lOPTi:» ,13.’  **  BOTH  ASSESSMENT  ANO  ROMT  CASES’,’ 

♦WILL  BE  DONE  IN  THIS  RUN’l 

14200  FORMAT  I//,5X,’I0PT2:*,I3»’  **  THE  FULL  SUB  PART  SETS  USEO  IN’,’ 

♦ASSESSMENT  CASES  WILL  NOT  BE  PRINTEO’l 
14300  FORMAT  (/ / , 5X , • I0PT2=* , 13 , *  **  THE  FULL  SU8  PART  SFTS  USEO  IN’,’ 

BE  PRINTEO’l 

’  *♦  THE  NO  SUB  PART  SETS  USEO  IN’.’  AS 

PRINTED’! 

14500  FORMAT  I//,5X,’I6PT3:’,I3.’  4*  THE  NO  SUB  PART  SETS  USEO  IN’,’  AS 

♦SESSMENT  CASES  WILL  BE  PRINTEO’l 

1 4  600  FORMAT  (//,SX.’I0Pl4  =  * ,13  ,*  ♦*  THE  UNcCNSTP  COST  ROmTS  LISTS’,’  W 

♦ILL  NOT  BC  PRINTEOfBUT  A  RF  COHPUTEOl’l 


1  ^  J  uu  r  U^nM  I  1/  A  f  j*  1  AW"  I  4-  fAJf 

♦ASSESSMENT  CASES  WILL  BE  PI 
14400  FORMAT  (//,5X,’I0Pl3:*,l3,’ 
♦SESSMENT  CASES  WILL  N ?T  8^  I 


14700  FORMAT  (//,5Xf’I0PT4:’,ij,- 
♦ ILL  BE  PRINTEO  *1 
14800  FORMAT  (  /  /  •  5  X ,’IOPTs:’ ,13,’ 

♦WILL  NOT  BE  PRINTED  ’I 
14900  FORMAT  (//,5X,’I0PT5=I,I3,’ 

♦WILL  BF  PRINTEO  *1 
15000  FORMAT  l//.5X,’IPRT:*,I J,* 

♦WILL  NOT  BE  PRINTEO  ’1 
15100  FORMAT  I//.SX ,’ iPRT:*, 13,* 

♦WILL  BC  PRINTED  ’1 
15200  FORMAT  l//,5X,’ IPRT  l:’  ,13,’  **  THE  FULL  SUP  ANP  NO  SUB  PART  S 

♦ETS  IFOR  ROMT  CASESI  VllL  NOT  BE  PRI NTE P • , / , I 3X , • NO R  WILL  ’ ,*THE  I 
♦NPUT-CRCEReC  ANO  COST-OPDEREO  pArTs  INPUT  LISTS  ’1 
15300  FORMAT  (//,5X,’IPRTi:’,I3»*  **  THE  FULL  SUP  ANO  NO  SUB  PART  * , •  S 

♦ETS  I  F  Cr  ROMT  CASESI  WILL  BE  PRI NTE 0  •  , / ,  l3X , • AS  WILL  ’ ,  ’THE  INPUT- 
♦OROEREO  ANO  COS T -OR OE 8 EP  PARTS  INPUT  LISTS  *1 
15400  FORMAT  (//,5X,*INT:*,I3,*  **  THE  PARTIAL  SUB  RCMT  ALGORITHM’, •  Wl 

♦LL  TEST  AT  INTERVALS  OF’, 13,’  (ALLOWABLE  NHCS  ACFT1  •! 

1 5 sco  format  (/,*  items  rank  orpereo  by  decreasing  part  costm 

156C0  FORMAT  ( 1  HI  I 

15700  FORMAT  (//,20X,*«*«  CONSTPAINEO  COST  SOLUTION  EVALUATION’,*  REPORT 
♦  ***’,///l 


**  THE  UNCONST P  COST  ROMTS  LISTS’,* 
•*  THE  CUH  ROMT  BY  OAY  COST  LISTS*,* 
♦  *  THE  CUM  ROM T  BY  DAY  COST  LISTS’,’ 
44  THE  SCENARIO  INPUT  0*TA  SUMMARY’, » 

♦*  the  scenario  input  data  summary’,’ 

44  THE  FULL  sup  ANP  NO  SUB  PART 
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656 

657 

65P 

659 

6  6C 

661 

662 

663 

66* 

665 

666 

6  67 

6  68 

669 

6  70 

671 

672 

673 

67* 
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15800  FORMAT  «1H1 ,//, IOx. ’THE  U*'CONSTP  COST  TOTAL  flCMT  SOLUTION  IS’,’  AL 

♦  SO  THE  CONS  TP  COST  TOTAL  PC**T  SOLUTION*  I 

1 *900  FORMAT  11M1  ,// , 1  OX  ,  ’THE  U*’C0NS1P  COST  RESIDUAL  PQMT  SOLUTION  IS*,* 
«  ALSO  THE  CCNSTP  COST  PES’OUAl  PONT  SOLUTION*  1 
ItCOO  FORMAT  (// , 1 OT , *  ALL  I N  0  S  US )  PARTS  ARE  AFFORDABLE  TN  CONSTRAInEO* 

♦  ,*  COST  SOLUTION  1*1 

1 6 1  CO  FORMAT  (// 1 10* • *  ALL  FULL  SUB  PARTS  APE  AFFORDABLE  IN  CONSTRAINEO* 
♦,*  COST  SOLUTION  1*1 

162C0  FORMAT  (/ / , 5X , F 1 2 . 0 »3X , *  A FPRO X  IMA TE D  BY*,F12.0,*  CUM  FULL  SUB’,* 

♦  PART  COST  THRU  DAY*. I*,*  IS  USEO  TO  BUY  FULL  SUB  PARTS’! 

1  6  300  FORMAT  C//.1CX, ’CONST*  CO'T  L  IM  I  T=  ’  ,F  1  2  .0,3  X  .  ’OF  UHTCH*,F12.0,3X,* 
♦CAN  BF  USED  TO  EUY  INO  SU® !  PARTS  OF  THE  UNCONSTR  COST  SOL’l 
16900  FORMAT  (/ / ,  1DX , *  NO  FULL  SUB  PARTS  ARE  AFFOROAPLE  IN  CONSTRAINEO* 
♦.*  COST  SOLUTION  1*1 

1  6500  FORMAT  I//.5X .*  THE  FIRST  CONSTR  COST  SOL  YIELDS  AN  AVG  FRAC’,’  PGM 

♦  FLY  HRS  A C Hr* • F5 • 3  I 

166C0  FORMAT  l//,5X,‘THF  2N3 I $Uf TNBLTYI  CONSTR  COST  SOL  YIELDS  AN*,*  AyG 

♦  FRAC  FH  A CHT* , F 5 .3 » 

16700  ENO 
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(NOT  USED) 
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1* 
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21 
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3% 
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4? 
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45 
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SUBROUTINE  CCCAP 


SUBROUTINE  CCCAP  ( I VD  ,  L I H 7 T ,C 0NVF , TT FH , K NTC ,1 P  ,FNC ) 

NAME:  CCCAP  TYPE:  SUBROUTINE 

PURPOSE:  THE  CCCAP  (CONST  P  AJWEP  COST  CAPABILITY  ASSESSMENT)  SUBROUTINE 
COMPUTES  FLEET  CIPIB1LITY  ISSrSSMENT  (AVG  A  V  AIL AB IL IT Y f PR  A C T  ION  FLYING 
PROGRAM  ACHlEVEC.rGH  FLYING  H^S  /ACFT/OAY  )  BASED  ON  TH r  CONSTRAINED  COST 
SOLUTION  BEING  STOCKED  IN  THE  WAR  RESERVE 

CALLED  BY:  MAIN  PROGRAM 

CALLS 

-FUNCTION  SR:  COMPUTES  CUMULATIVE  NET  0  EM  AN  0  THRU  A  SPECIFIED  OA  Y 
FOR  A  SPECIFIED  PART 

FILES  USED  :  INPUT  -  NONE 

OUTPUT  -  UNIT  6  (PRINT) 


COMMON 


AC (120)  . 
ALLOWS (  120)  . 
AVM  (120  ), 

CO  MOA (  3  00 1 1 
CNCS(300)« 
OCOSTF ( 120)  • 
000(300  ), 

FHP (120  )  , 

IF  S (300  )  , 

IP  T ( 100  )  , 

NP 


ACL  , 

AM  S  N  (  3nrl  )  t 
0CT ( 3np) t 
CF ( 300) , 
COST ( 3PQ  ) • 
OCr(JOP)  , 
FHl (120)  , 
ICOST, 
IMSFL  , 

IRC (300), 
NP1  , 


PTSEP(300f24 ) #  CP* l 30P ) • 

SM (  120, 100) ,  SR 4 1  x 1  ( 300 )  • 


AOESC (300), 
ASURV  (120  ) , 
BF (300), 

CL  , 

CRNCSI3D0), 
OF ( 30  0  )  , 

fhm. 

IOCC ( 2), 

IN  S ( 3~0 )  , 
IPO ( 300) , 

NP  2  • 

R  N  C  I  1  20 )  , 

ST  K ( 300) , 
TSUMB 


i^ui iuu * . 

TRNCS( SOOI,  T$T  k ( 3P0 ) , 

DIMENSION 

♦  OMOT( 300) ,  FH4CII20),  FHNZ(I20) 

CHARACTER416 

4  AOESC,  ADS  C ,  AMSN, 

B  M  A  X “0 • 

AVAVGf 1 )=0. 

A VA VG( 3 )=0. 

TFHNCzO. 

T  S  UR  V-0 • 

TNCO-O • 

DO  100  1=1, NW 

T S UR V=TSURV* ASURV (I) 

SUMP ( I ) rO  . 

00  IDO  K  =  1.3 
100  FHPAPO  (  K,  I  ) 

DO  200  J=I,NP 
DOO(J!-P. 

OMOT ( J)=0. 

200  0MD(J)-0. 

X  X  -  A  SU  P  V  ( 1 ) 

TAV=0. 

00  1200  1=1  *  NW 
IA=(  1-1  )/54l 
00  300  J=1 ,NP 

RNCS ( J)=RNCS( J) M TWD-1 ) 4PT0EPI J, I  A )/5  . 

IF  (l.GT.l)  XX  =  PNC(I-1 )*ASURV(I-1 MAC (I)-AC  II 
FHA(I)=AMIN1(XX*FHM,FHR(I)) 

IN0X=0 

IF  (NP2. EO.O)  60  TO  6P0 
00  5CP  K=1 ,NP2 
II=INS(K) 

XXrOMOT (II) 

OKOTIII  )=SR (I  ,II.rX) 

ZP=PMOT  (II  l-RNCSlU  I 
SUMP  ( I)  =  SUMB( I  I ♦ A  M  A  K 1 (n®, ZP ) 

IF  (  N  PI  •  E  Q  *0  )  GO  TO  800 
BMAX=0« 

00iI55fstAinf1 

XXrOMOT (II) 

OM.DT(  II  )=SR  (I.II.rxi 
BOrCS=(OMCT III) -RNCS I II l)/OPA(II) 

IF  (BOFCS.LE.O.  )  »OFCS=0. 
BMAX=AMAX1(BMAX,B0FCS> 

Too  CONTINUE 

800  AUNCS=AMAX1 (0. , ASURV ( I ) -SUMR ( II -B* AX ) 

FHNC (I)-AMINI  (FHR  (I)  , IU*CS*FHM  ) 

FHPAPO( 3 , I)=AMIN1 (FHM,FHR(I ) / ( AuNC S ♦ . 0 I > ) 

FHNZ ( I ) — F HNC ( I )/4F HO (1)4.000001) 


ALLOVI  (120) , 

A  V  «  V  G  (  6 1  • 

CASE  , 

CM  IN  T  • 

PC  CS  T  1  (300), 

DM  P ( 30  0) , 
FHPAP0(3.120), 
IFHC ( 120) , 

INT. 

ISHORT, 

N  W 

RNrS (300 ) , 
SUMB(I20>, 


CASE 


300 


400 


500 

600 


-I) 
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82 

83 

8M 

85 

86 

87 

88 

89 

90 

91 

900 

92 

93 

1000 

9M 

95 

1 100 

96 

97 

9P 

99 

12C0 

100 

101 

102 

103 

10M 

105 

106 

107 

106 

109 

1  10 

1  11 

112 

1  13 

1  1M 

115 

116 

1  17 

116 

1  19 

120 

1300 

\l\ 

1**00 

123 

12M 

i 25 

1500 

1  26 

1600 

127 

1  28 

1  7C0 

1  29 

1  30 

1800 

1  31 

1  32 

1900 

133 

2000 

13M 

2100 

1  35 

22C0 

136 

2300 

1  37 

2  M  00 

138 

1  39 

2500 

1  MO 

2600 

1  M  1 

AUNCS=AUNCS/( ASUR V(1  )♦ .TO 00  I ) 

Z  =  AES(FHNC(11-FHA(1I) 

INOX  r  IND  X ♦ 1 

IF  ( INOX. GE .LIMIT .OR • (Z/l TTFH*1. 1) .LE . ICONV F/NW ) • OR .INOX.GT ,301 
►  GO  TC  1000 

FHA(1)-.5*(FHA(1)  ♦  FHN^  I  )  J 
BM  AXrQ. 

s umf  mro . 

00  900  J- 1 » NP 
OMOT  ( J)  =  OMO | J) 

GO  TO  MOO 

TFHNC-TFHNC*FHNCII  1 

do  i iro  j  =  i t n p 

0M0( J)rDMOT(J) 

TNCO - TNCO  ♦Z 

PNC! 1 l-AUNCS 

TAV=TAV^RNC(I)**SURY(I) 

CONTINUE 

Z  =  ICO. ♦TNCO /CTFHNC*  .0011 
FNC=TFHPC/TTFH 
IF  (IP.fO.O)  RETURN 
00  1M00  I -  1  t NW 

SUKB(I)=SUMR(I )/(  ASURVCTM.POOOD 
AX  =  1 .-I  ALLOWS (1 )/(A$UPV €  1 1 ♦ .00000 1  >) 

IF  (MOOT 1-1 #501 .NC*3)  60  TO  1300 
WRITE  (6,1500)  CASE 

IF  ( 1C0ST  .EO. 1 .ANO.TNC.rQ.i  )  WRITE  (6  ,1600) 

IF  (ICOST.EO.l.Af.0.  TNO.EO.  2)  WRITE  (6,1700 
IF  (ICOST.EC.O)  WRITE  (6,1800)  KNTC 
IF  (1C0ST.E0.1)  WRITE  (6,1900)  CL 
WRITE  ( 6 , 2000 ) 


writf 

WRITE 

WRITE 

WRITE 

WRTTF 

WRITE 

WRITE 


( 6 , 21C0  1 
( 6*2000) 
(6,2200 ) 
( 6 , 2OC0 ) 
(6,23QQ) 
( 6 , 2M  00  ) 
(6,2000) 


AVAVG(l)rAVAVG( 1 ) ♦ R 9C  ( I T*ASURV(1 )/TSUPV 
AVAVG  (3)  =  AVAVC«  3)  *FHPAPO  (  3, 1  )*PNC(  I  )  ♦  ASURVt  D/TAV 
WRITE  (6,2500)  I ,FN C( I  >  t AX  ,J,FHNZ( I ) ,FHPAPO (3 ,1 ) 

WRITE  ( 6 , 26C0 )  A V A  V G ( 1  )  ,  A  V A VG ! 2 »  ,F NC , A  V  A VG (  3) 

RETURN 

FORMAT  ( 1  Ml  ,30X  ,*CASE-  * , A  1 6 ) 

FORMAT  (/ , 2 OX , * **  FORCE  CAPAPlLlTr  WITH  CONSR  COST  TOTAL  *,*RQMT 

♦  SOLUTION  STOCKED  A7  RETAIL  (NO  POST  D  -0  A  Y  PARTS  OEPLOYEO)  ♦  *) 

FORMAT  (/92rx.'*«  FCRCE  CAPABILITY  WITH  CONSR  COST  RESIDUAL  *  ,  *R 

♦  0 M T  SOLUTION  $TOC*EO  t  OEFLOYEO  *♦*) 

FORMAT  (/,20X,**9  F  OPT  E  CAPABILITY  GIVEN  THE  CURRENT*,1  lNV*,fEN 

♦Tory  STKEO  C  DEPLOYED  FOR  SUBSTITUTION  POLICY*, 13,*  ♦♦*) 

ORMAT  (///  ,10X,*C0ST  LIMIT  0F*,F12.0) 

(/  ) 

(*  TOTAL  FLY  HRS  CONVERGED  TO*,*  WI TH IN  * , F7  .3 , *  PERCENT*) 
(3X,*ACFT  AVAIL* f2cX,*  FRAC  FH  A CH * , 3X  ,  * FH / A C/ 0  A Y * ) 
(15X,,PART*,26X ,  *  P  AR  T  *  *  IPX, *PART  *) 

(6X, *OAY* ,7X  ,*SUB*  *3X, *REC  A V A I L *  ,  6X , *  0 A Y* ,6Y,*SUB* , 11 X, * SU 


forma 

FORMAT 
FORMAT 
FORMAT 
FORMAT 
FORMAT 
♦B*  ) 
FORMAT 
FORMAT 
END 


(5X.IM ,5X,F5  .3.7X,r5 .3.5X,1M.WX, F5.3.6X.F6.1 ) 

(/,*  AVG  AVAIL* ,5X , F  5. J,7X,F5.3*  12X,r5.3,10x ,F  5 • 1 ) 
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13 

1* 

15 

16 

17 
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21 
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26 
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28 

io 

31 

32 

ll 

35 
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35 
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41 
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43 

44 
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SUBROUTINE  CCLIST 


SUBROUTINE  CCLIST  (  IG f ICRr , INO I 
NAME:  CCLIST  T YPr  :  SUBROUTINE 

PURPOSE:  THF  CCLIST  (CONSTRAINED  COST  REQUIREMENTS  LIST)  SUBROUTINE 
PRINTS  THE  CONSTRAINED  COST  RE CUU I R E HE N T S  SOLUTION. 

CALLED  BY:  MAIN  PROGRAM 


CALLS 

-SUBROUTINE  HAXC:  ORDERS  THE  LIST  OF  POUlREMENTS  To  BE  PRINTCO 


ADESC  (  300  9  « 
ASUPV  11201, 
BF 13001, 

CL, 

C  p  NC  S  1300), 
OF (300) , 
FHH, 

IOCCC  2). 

IN  SI  300 J , 

I R  0  I  3  00  )  , 

NP  2  , 

PNCI 1 20) , 

S  T  K  (  3  CC  )  » 
TSU*B 

AM  SN  , 


(6,1 

16,1 


CL , *  CL 

CL  ,ACL  tlOCCH MD  ) 


ALL0V1  (120), 
AVAV6I6I • 

C A  rE  , 

CMlNt , 

OCOST 1 (300 ) , 
rMri30n>  f 
FHDAPD(3, 120), 
IF  MC  ( 1  20  I , 

TNT, 

I S  HOR T  t 
N  W  , 

R  N  rS ( 300) , 

SUMB ( 1 20 ) , 


CASE 


OUTPUT  -  UNIT  6  (PRINT) 

COMMON 

AC  (  120  )  •  ACL, 

ALL CwB ( 120) ,  AKE N  f  3 n0 ) , 

AVM  1120  I,  BCT (330), 

CCMCAI3001,  CF(3P0), 

CNC$(300),  COST(30O), 

DC  05T  F ( 120) t  OCT* JQO), 

DC  C  (  3  00  )  ,  FH*  U2P), 

FHR  ( 120  )  ,  ICOST, 

IF  S  (300  )  ,  IMSFL , 

IPTI100  ),  IRC  I  300) , 

N  P  NP  1 

PTdrP(3C0,24)  ,  orfhor), 

SM  (  120,  100) t  SR* A  f 1  I  300  I , 

TRNCSI300),  TSTk(3^0), 

CHARAC  TER*16 

♦  AOESC,  AQ'C. 

IF  (IORP.LE.O)  GO  TO  300 
00  100  1=1, NP 
I RO ( I  )=0 

100  000(1) rRNCS  f I ) 

NPUMHt “NP 
00  2JC  *  =  1 ,NP 

CALL  MA  X  C  (NOUMMY  ,NOUT) 

IRO(r  )  =  N0 UT 
I I =1 POIK ) 

200  000(11  )=-l . 

300  00  5CD  1=1 , NP 
1 1  =1  F  0  ( 1 1 

IF  (IORO.LE.D)  II=I*CCI1 
IF  (M00( I -I .501 .NE,0 1  §0  TO  4Q0 
WRITE  (6.600)  CASE 
IF  (IN'O.EQ.l)  WRITE  (6,700) 

IF  (IN0.E0.2)  WRITE  (6,800) 

WRITE  (6,900) 

If  (Ig.eo. i)  write 
IF  (IG.tc.2l  WRITE 
WRITE  (6,1200) 

WRITE  (6,90c) 

WRITE  (6,13001 
WRITE  (6,900) 

400  CNCS (II I -COST (III*RNCS(TI ) 

TC=1C0.*CNCS(II )/ (ACL*. 000001 ) 

500  WRITE  ((,1400)  I  ,11  ,AM$N(II ),AOESC(II),FNCS(I II ,CNCS(II) ,TC 
RETURN 
6n0  FORMAT 
700  FORMAT 
800  FORMAT 
900  FORMAT 
1C00  FORMAT 


(1H1  ,3PX. *CASEr  *,|16) 

!/,•  TOTALdNIT  STK=OI  S  TK  RQMTS  BY  POLICY  *1 
</ j30X,fRESlOU*L(INIT  STKrCURR  STK)  ST  K  ROMTS  BY  POLICY 

FORMAT  I//,  IOXv’COST  LIMIT  0F*jrFl2.0J*  iPPRCXlMiTro  BY^F^.O,1 
♦  I  NO  A  COMBINED  (CHEAPEST  NO  SUB  P AR T S 1 /SUSTNB LT Y  SOL  •) 

11C0  FORMAT  l//.10X«*CQST  LIMIT  0FV«F12.09"  APPROXIMATED  BY*.F12.0,f 
♦ I NG  A  SUSTAINIBILITY  SOLUTION  FOR  COST  THRU*, 14,*  OAYS*) 

1200  FORMAT  (/  .  6  6X  .  ■  PA  RT  I AL  SUPSTM 

1300  FORMAT  f 1  OX , *  PA  RT  NF * , I7x  .  «PA RT • ,21X f * R OMNI • , 7X ,*COST  XCOST*) 
1400  FORMAT  (2Xll5,I10,5X,»16t2x,A16,F8.1,F12.0,F6.2,4X) 

ENO 


US 

US 
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21 
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24 
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SUBROUTINE  NCRNC 


SUBROUTINE  NCRNC  IND  ,  I  2 , IF'O  I 
NAME:  NCRNC  T  YPf  :  SUBROUTINE 

PURPOSE:  THE  NCRNC  (NO  C*  NNI  P  *  1 1  2*  T  ION  RE  0  l'IR  EVENTS  I  SUBROUTINE 
GENERATES  A  LEAST  COST  FZMNTS  MIX  Of  SRARE  PARTS  NrE  OE  0  TO  ACHIEVE  A 
FLEET  FLYI  f'G  HR  PROGR  A  H/ 1  V»  I L  A  9 1 L  I TY  OBLECTIVE  USING  A  USER-SPECIFIED 
PARTS  REPLACEMENT  POLICY  ANC  UNCONSTRAINED  COSTS. 

CALLED  BY:  SUBROUTINE  UCROPS 

CALLS 

-FUNCTION  SR:  COMPUTES  CUMULATIVE  NET  DEMAND  THRU  A  SPECIFIED  0 A Y 

for  a  specified  part 

FILES  USED  :  NO  FILES  READ  OR  URITTEN 
COMMON 


♦ 

ACC12D1  , 

ACL  f 

AOFSC  (300  lf 

At  LO W  1  ( 1  20  1  . 

♦ 

ALLCWB ( 1201 . 

APTNf 300)  , 

ASt'PV  (120  lf 

AV  #VG (61  . 

♦ 

1VM  (I2D  19 

ecroorif 

BF  (  300  )  t 

CASC. 

4 

CCrrA(3001. 

CF( 3C0  1 1 

CL. 

CHINT. 

♦ 

CNC< ( 3001 t 

COST(3rolf 

CRNCS  (300  1. 

DC0ST1 (3001, 

4 

OCOSTFf 1201 « 
000  (300  1* 

CCY ( 3DP 1 t 

OF ( 3  0  0 1 v 

OHO ( 30ni f 

4 

FH» (1201 f 

FHH, 

FHPAP0(3 ,1201 

4 

FHF  (120  1  9 

1C0ST, 

IDCC ( 21, 

IN S (  3 n0  1  t 

IFMC( 1201, 

4 

IFS  (300  1* 

IH5FI  . 

IRC ( 300 1 f 

INT. 

ISHORT. 

4 

IPT  (10D  1, 

IPO (3001 . 

4 

4 

NP 

Pt6eP(300,2H 
Sm (120.1  CO  I, 
TPWCS ( 3001 f 

NP1  . 

f  OP A ( 3001 • 
SR4A7 I (300 1 t 

NP  2  . 

RNC( 1201 , 

NW  f 

RNCS ( 300 1 . 

4 

STK(3C01. 

SUHB( 1201 f 

4 

TST  K  ( 3 CO  1  * 

TSUNB 

DIMENSION 

4 

SUMfiZf 1201. 

SUHPC1201 

CHARAC TER*16 

4 

N I 

AO  t  SC  » 

r A  LL  0^8 ( NO  1 5 

ADSC  t 

AMSN  . 

CASE 

IF 

(I2.tT.NAl  60 

TO  230 

SUMR=0. 

TSUME=0  . 

DC  100  L=I*ND 
SUMP (11=0. 

10D  SUMPZ(LI=D. 

200  T0T2=0. 

DO  700  K:i,NP2 
II -I KS(  K I 

IF  (I2.LT.NAI  GO  TO  9TD 
CO MC  A (II I  TO. 

CPNCSdl  l=RNCS(II  I 

IF  (1N0.E0.2I  CRNCSI II 1=TSTK (II l*RNCS (III 
00  3 CD  Irl.ND 
CDMr=COMOA (III 
cDMrA(in=sR(i,n.crMri 

IF  (IND. EC. 21  SUM® (I  I rSUMP (I I»AMAX1  (0. , (CRNCS (III-COMOA (II I  I  I 
SUMP2  ( I  l  =  5UM3?(  IMCrMDA  (II  I 
•TSL,VB=AMAX1  (SU**9Z(I  l-f  UMR  ♦  SUMP  ( I  1,0.1 

IF  ((  TSUMB-CRNCSO  1 1  I  .GE.ALL0W1  (  I  I  I  CRN CS ( 1 1  1 =T SUMB -ALLOW  1  (  I  1 
300  CONTINUE 

SUMR=SUMR*CRNCS(III 
GO  TO  700 

POO  ZINT =MIN0 (INT ,NA-I2I 

IF  (IZ.GE  .(TSUMB+.SI I  RETURN 
IL=IM(NP2-K«  II 

IF  (  (CRNCS(ILM(IN0-1I*?INTpTSTK(ILII  .GE.C0M0A(ILH  60  To  700 
Z=CRNCS( ILI*ZINT 

1Z-Z* (INO-1 l*ZINT*TRTX ( TLI-CDHOA(ILI 
IF  (TZ.LE.OI  60  TO  SOP 

CPNCS«ILI=CDMCA (IL|-(IND-1|*ZINT*TSTK  CILI 

TOTZ=TOTZ«ZINT-TZ 

IF  (TOTZ.LT.ZINTI  GO  TO  700 

CRNCS (IL I=CPNCS(1LI-T0TZ«ZINT 

GO  TO  600 

500  CRNCS (IL I rCPNCS(ILI*AMIVI (ZI NT-TOT Z ,Z INT I 

600  TSUME=TSUMB-ZINT 
RETURN 
700  CONTINUE 

IF  (I2.EQ.NAI  TSUMB=TSUMB-CRNCS(III 
IF  (  12  .LT.NA.OP .INO.EO.l I  RETURN 
00  800  K-l , NP2 
J=INS (K I 

800  CRNCS( J>=CRNCSf JI-TSTX ( Jl 
RETURN 
ENO 
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4 

5 

6 

7 

8 

9 

10 

II 

12 

13 

14 

15 

16 

17 

ie 

19 

20 

21 

22 

23 

24 

25 

26 

27 

2  6 

29 

30 

n 

33 

39 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 
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53 

54 

55 

56 

57 

58 

59 

60 
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SUBROUTINE  UCCAP 


SUBROUTINE  UCCAP  1 1  NO ) 

NAME:  UCCAP  TYPE:  SUBROUTINE 

PURPOSE:  THT  UCCAP  tUNCPNSTBATNEO  COST  CAPABILITY  ASSESSMENT!  SUBROUTINE 
COMPUTES  FLEET  CAPABILITY  |AVT  AVAILABILITY  ,PG  *1  FLYING  HR  S  /  ACF  T /D  A  Y  I  BASE 
ON  THE  UNCONSTRAINED  COST  SOLUTION  RCMNT  BEING  STOGKEO  IN  THE  VAR  RESERVE 

CALLEO  BY:  MAIN  PROGRAM 

CALLS 

-FUNCTION  SR:  COMPUTES  rU“ULATIVE  NET  OEMANC  THRU  A  SPEC1F1E0  OAY 
FOR  A  SPECIF1E0  PART 

FILES  USED  :  INPUT  -  NONE 

OUTPUT  -  UNIT  6  I  PR INT  1 

COMMON 


♦ 

ACC  120) , 

ALL  CwB 1  1201  , 

ACL  • 

AO  E  SC (3001, 

ALL0W1  11201 

♦ 

AHSN(3r0l, 

ASURV  (120  1  , 

AVAVGC6I* 

♦ 

AVM120  ), 

BCY ( 3001 t 

BF (3001, 

CA  SE  , 

♦ 

COMDA 13001, 

CFI 3001 , 

CL  , 

CH  INT  , 
0C0ST1 13001 

♦ 

CNCSI300), 
OCOSTF 1 1201 , 

COS  T ( 300  1 , 

CRNCS  13001, 

4 

OCT (3001  , 

OF (3001, 

CHOI  3001  , 

4 

0001300), 

FN 1  (1201  , 

fhh, 

IOCC 1 21, 

FNPAP0I3.12I 
I  F  HC I  1 20  «  , 

4 

FHFI120), 

ICCST, 

4 

IF  S 1300  )  , 

IH5EL, 

IRC ( 300  1  , 

INSI 3^01, 

IWT 

ISHORT , 

4 

IPTtlOO  ), 

1R0C  3001  , 

4 

PTOFP 1 300  .2B  )  , 
SM 1 120,100), 

NP  1  , 

NP  2  , 

NW  , 

4 

OP* (3001 , 
SR"A*1 (30Q|, 

PNCI I 701, 

PNCSI3001, 

4 

STK (  3001  , 

SUHB ( 1201 t 

♦  TRNCS I 3C0 ) « 

CH A  RAC  TFR*1 6 

TSTk (  300  1  § 

tsuhb 

4 

4 

TAV 

AO  E  SC  , 

RAV 
=  0. 

AO  S  C  , 

AHSN, 

CASE  , 

T  A  V  1  =0  . 

DO  100  1=1. NP 
TSTK CT)=STKfI) 
0001  I  1=0. 
ioo  oMom=r. 

00  30C  1=1, NU 
00  20C  1  =  1 1  ' 
200  FHPApnr 
300  sumb il i =o < 

00  BOO  1=1,3 
BOO  A  V  A  VG I  1 1=0 . 

00  1000  1  =  1  ,NV 


liUlio. 


500 


)  I uuu  l-l 
I  A  —  f I  — l 1/5*1 
00  500  Jrl.NP 

TSTK  I  J>=TSt  M  JMPTOCPC  Jfl  A1  /S. 


BMAX=C. 

IF  (NP2.E0.01  60  TO  700 
00  6 CO  K  =  1.NP2 
1I=INS(kI 
X-0^0 I  1 1 1 

OHCtIIl=SRf I,II ,X1 
ZPrPNCS I  III 

IF  I1N0.C0.2I  ZPr*NCS(III*TSTK( III 
6PQ  IIirSUKPIl  MAHAU  ( 0  .  ,0H0 1 1 1 1 -ZP I 

7(30  IF  INP1.E0.0I  GO  TO  900 
00  8  CO  K - 1 » NP I 
II rlFSlKI 
X  =  OHDI I II 

OHT  (II l=SR(lvIX ,X1 
ZP -PNCS  (III 

IF  (INO.CO. 2>  ZP-7NCSniMTSTKIIII 
BOFCS - ( OHO ( II l-ZPf/OPA  f II 1 
If  (BOrCS  .l C .0.  1  3  0FC5 -0 • 

BHAXrAMAXl (BHAX  ,BDFCS1 
800  CONTINUE 

900  RNC  ( I I  =  A  H  AX  1 ( 0  • t A SU& V ( I > -PM A X-SUMB 111  1/t  A  SURV  ( 1 1  ♦ .00011 

FHPAPOI 1 « II=AH1N1  IF«H»FNR (I  I  / ( ASUR  V ( I  1-BM AX -SUMB I  1 1  I*  .0001  1 
TA VlrTAVI ♦RNC (I 1*ASURVCT1 
1000  CONTINUE 
TSURVrO. 

00  1200  1  =  1  ,NV 

A  X  =  1  .-(  Am  OWB  (1 1/1  A$URV  UM  .000001  11 
IF  (HCOII-I  ,501.NE.?1  GO  TO  1100 
WRITE  (6,14001  CASE 
WRITE  ( 6 , 1 5P0 1 

IF  (IN0.EQ.1I  WRITE  (6,16001 
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82 

83 

89 

85 

88 

87 

88 

89 

90 

91 

92 

93 
99 

95 

96 

97 

98 

99 
100 
1  ox 
102 
1  03 
1  09 

105 

106 
107 
1  08 

109 

110 
111 
112 
113 
119 


IF  (IFO.EC .2)  WRITE  16,17001 
WRITE  (6,1800) 

WRITE  (6,1900) 

WRITE  (6,1800) 

WRITE  (6,2000) 

WRITE  (6,2100) 

WR1TF  (6,1800) 

1  100  TSURYTTSURV* ASUPV (I) 

AVAVG(1)  =  AVAV0C1)+MCCI>*ASUPV(X> 

AVAVG(2)  =  AVAVC(2MAX*I$URV(I) 

AV AVG (3 )=AVAVC ( 3) ♦FHPAP0( 1, I )*RMC( I )* ASURV( I ) / ( T A Y1 ♦ . 000 1 ) 

R  A  V-  *  FLYING  HR  PROG • 

IF  (  1FHC (  1  )  .EO. 1 )  R  A  V - *  AVAIL  CONSTRAIN* 

1200  WRITE  (6,2200)  I , RNC ( T ) , A T , R A  V , A VM ( I  ) , F HPA PO ( X , T) ,1 
00  13C0  9*1,2 

1300  AVAVGU1  )rAVAVC(K  )/TSU°V 

WRITE  (6,2300  )  ( A VA VG ( A  I ,K= 1, 3) 

RETURN 

1HC0  FORMAT  I1H1 ,3DX,’CA$E=  ’,A16) 

1500  FORMAT  I/.30X,’**  FORCE  CAPABILITY  GIVEN  THAT  THE  COHPUTEO’, 
♦U I  RE  ME  NT  (FOR  EACH  POLICY)  IS  STOCKED  **’> 

1600  FORMAT  l// | 15X, ’***  CASES  ASSUME  TOT  At • INI T  STKrOI  R£  OM  TS ’ , ’ 
♦TOCKEO  AT  RETAIL  CNO  POST  0 -0  A Y  PARTS  OEPLOYEO)  ***’) 

1700  FORMAT  C//.15X,’***  CASPS  ASSUME  RE SIOU AL C 1 NI T  STK=CURR  STK ) ’ 
♦CMTS  AFE  STOCKED  A  NO  OEPLOTED  ***’> 


1800  FORMAT  I/) 


1900  FORMAT  1/ ,9 X , • A  1 RCR AFT  A  V  A  1  LA  0 IL I T Y ’  , 
2000  FORMAT  12  5  X  ,’PART*. 38X •’PART1 ) 

2100  FORMAT  1 1 8X  , • DAY • ,SX,'sUB’ ,  •  REO  AV* 


30  X FLY  HPS/AC  /DAY’) 
avail  AVAIL’, ’  SOURCE’,’ 


♦•,7X,’SUB*,5X,*0AY*) 

2200  FORMAT  C 1 7 X  ,  1 4 , F8 .3  ,t X , FS . 3 , A  1 6 , F 5 . 2 ,F 1 0 . 1 , 18 ) 

2300  FORMAT  C/,1X,’  AVERAGE-  ’  ,  1 1 X , F 5 . 3  ,6 X  ,FS . I, 21 X ,F 1 0 . 1 » 
ENO 


’  REO 
ARE  S 

.’  RE 


AVAIL 


B-20 


1 

2 

3 

4 

5 

6 

7 

8 

9 

ir 

li 

12 

13 

1* 

15 

16 

17 

18 

19 

20 

21 

22 

23 

29 
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28 

29 
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32 

ll 

35 

3b 

37 

38 

39 

40 

41 

42 

93 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

S5 

56 

57 

56 

59 

60 

61 

62 
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SUBROUTINE  UCRQPS 


SUBROUTINE  UCRQPS  I  I NO  ,  I O^T 4 , 1 0PT5 , 1  OR  0 > 

NAME:  UCRQPS  TYPE;  SUBROUTINE 

PURPOSE:  THE  UCP0PS  I UNC0NS TP/ I  NED  COST  RCMNTS -PARTIAL  SUBSTITUTION) 
SUBROUTINE  COMPUTES  AND  POINTS  THE  LEAST  COST  R  C  M  NTS  MIX  OF  SPA  PE  PARTS 
PARTS  NEEOED. GIVEN  UNCONSTRAINED  FuNOS.TO  ACHIEVE  THE  CASE  OBJECTIVE 

CALLEO  BY:  MAIN  PROGRAM 


CALLS 

-FUNCTION  SR:  COMPUTES  CUMULATIVE  NET  OEM AND  THRU  A  SPECIFIED  0 A Y 
FOR  A  S°ECIPIEO  PART 

-SUBROUTINE  MAXC:  OROTRS  LIST  OF  PART  ROMNTS  TO  BE  PRINTEO 
-SUBROUTINE  NCPNC  :  COMPUTES  THE  PQMNT  SOLUTION  FOR  THE  *N0  SUB*  PART 
SET  AND  A  SPECIFIC  ALLOWED  STOCKOUT  FOR  THAT  SET 


FILES  USEO  :  INPUT  -  NONE 

OUTPUT  -  UNIT  6  IPRINTI 


0  I  MENS  I  ON 

♦  RMINI300) 

COMMON 

♦  AC  I  120  I  • 

♦  AL L  CuB < 120 ) t 

♦  AVMC1201* 

♦  CDFCA (  300  1  • 

♦  CNCSl 300) | 

♦  OC  OSTF < 120)  « 

♦  oornoo), 

♦  FHRI1201, 

♦  !F$(3nO), 

♦  IP T  1 1 00  I « 

+  NP 

♦  PT(5fp  *300,24  ) 

♦  SM  *  120  t  IOC )  • 

♦  TPNCSI300), 
CHARACTFR41 6 

♦  AO  E  SC  • 

00  100  K=1,TMSEL 
00  100  1=1,120 
100  SM I  I  .K  )  =0. 

00  20C  J= 1 . NP 
TSTK < J)=STK < J) 
RNCS < J)=0. 


ACL  , 

I  MS  N  <  3  00  )  , 
PCV I  300) t 
CF  <  300)  , 
COST <3001, 
0CTI30D  , 

IMS  F  L. 

IRC l?OCI, 
NP)  . 

QP * <300)  , 
SR*A  XI  f 30C 
TSTKI3O0), 


AOS  C  , 


CRNCS  f J)=0. 

COMOA  <JI=0. 

200  SRMAX1 I Jl=-999. 

00  3QC  1=1, NW 

ALLOV'llI  ) =A LL  OWP  < I ) 

ocosthii=g. 

300  OC  OS  TF <I)=0  . 

00  1 60C  1=1  ,NW 
I  A  =  <  I  -1  )/§«l 
TALLOW=ALLDWB II  I 
CMIN  T =999 99999999 • 

NArALLOWB (1 Ml. 5 
00  4  CO  J=  1  , NP 

TSTK*  j)  =TSTK<  JMPTDEP<  J,IA  )/5 
400  RMIN*J)=0. 

21  NT  =INT 


ADESC  <300), 
ASLRV  <120  ), 
BF  <300), 

CL  , 

CRNCS  <3001, 
OF  <300), 

FWM  , 

IOC C <  2), 

IN  S  <  3n0 ) , 
IRO<  300) , 

NP  2  • 

RNC( 1 20) , 
STK  <  300) , 
TSUMB 

AM SN  , 


I A  00=13 

IF  <M00<NA-1,INT) .NE.P)  IA00=1 
MULT  =  <<NA-1)/INTMIA0D 
NAO=FOLT4INT41 

last  =n 

00  1500  L 1 =1 , NAO , INI 
L2  =  Mn<Ll,NA) 

1 2  =  N  A  —  I  1-1 
ALLOW] <1>=I2 
IF  CNPl .EO.O )  60  TO  700 
00  600  JA  T 1  ,NP 1 
J  =  1FS  < JA) 

IF  IL2.GT.il  60  TO  5Q0 
COM0=C0M0A< J) 

CTPOA  *  J)  =  SR < I , J, COMO ) 

XXX  =  C  OMO A < J) 

IF  <IN*0.EC.2)  XXX  =  XXX-TSTK<J) 

IF  <XXX  .GE.SRMAX1 < J ) )  SRMA X 1  < J  )=X XX 
CPNCS  <J)=AMAX1<0.,$PMAX1<JI) 

GO  TO  6C0 


AL  LOW  1  <120), 
AV  A V G  <  6)  , 

CA  SE  . 

CM  IN  l  • 

0C0ST1 <300), 
0MP<  300) , 
FHPAP0<3.120) 
IFHC< 120), 

1  N  T  * 

ISHOPT, 


N  W 

PNCS<300) , 
SUMb  < 120) , 


CASE 
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82 

500 

83 

8* 

600 

05 

700 

66 

87 

88 

800 

89 

9C 

91 

92 

93 

900 

9*4 

1000 

95 

96 

97 

98 

99 

100 

1100 

101 

1200 

1  02 

103 

1  04 

1  05 

1300 

1C6 

1400 

107 

1500 

108 

1  09 

1600 

1  10 

1  11 

1  12 

1  13 

1  1** 

1  15 

1  16 

117 

1  18 

1  19 

1  20 

121 

122 

1  23 

1700 

1  24 

1  25 

126 

127 

128 

1  29 

1600 

1  30 

ivco 

131 

132 

1  33 

1  34 

1  35 

1  36 

1  37 

1  3$ 

1  40 

141 

121 

2000 

1  44 

2100 

145 

2200 

146 

1  47 

148 

149 

150 

151 

1  52 

1I93 

155 

156 

152 

1  50 

160 

161 

162 

163 

IF  (Ll.rE.N4l  7INT=V4-L4ST 

crNcs(j)=AM4xin . , crscs  c j)-zint*qpa( j  j j 

CPNCS ( J  )  =  AMAX 1(CR VC? ( J)  ,RNCS( J) > 

IF  (NP2.GT.0)  CALL  VCONC  (1,12, INO) 
toTC=0. 

00  POO  J=1,NP 

TOTC=TOTC«COST(J)*CPNCS(J> 

IF  (TOTC.CE .CPI  NT)  GO  TO  1000 

TALL0U=I2 

CMINT=TOTC 

00  900  J=1,NP 

RMIN( J)=CRNCS(J> 

IF  (L2.NE.NA.4N0.NPl.NE.0l  GO  TO  1900 
00  1200  J-l »NP 

PI-CS ( J)=AHA »1 (PNINI Jt ,RNCS( J) » 

DCOSTF ( I)=0C0STFII)«RNCS(J)PC0ST(J) 

CO  1100  H=1,IHSEL 

IF  (J.EO.IPT(«|)  ?M ( I ,M  )  rPNC S ( J  I 
CONTINUE 

CNCS(J)=CCST(J)*RNCS(J) 

IF  (NP1.E0.0)  GO  TO  lfcOO 
00  1300  J=1,NP1 
I I  =  IF  SI J) 

0CCST1  II)=DCOST 1(1 )«RNCS(II l*COSTIII) 

IF  (NP1.EC. 01  GO  TO  1600 
LAST=tl 

ALLOW  1( I ) -TALLOW 
CONTINUE 

IF  (IC05T.EC.1)  RETURN 
WRITE  ( 6  i  28  CO )  CASE 
IF  (INC.EO.l)  WPITE  (6,2900) 

IF  (IN0.E0.2)  WRITE  (6,3000) 

IF  (ICOST.EO.l)  WRITE  (6,3100)  CL , AC L , I OCC ( INO ) 

WRITE  (6,3200) 

WRITE  ( 6, 73 CO )  COIN  T 
IF  (ICC ST. EC. 1)  RETURN 
IF  (IORD.LE.O)  GO  TO  1900 
IF  (ICOST.EO.l)  RETURN 

IF  (IOFtv.LE.O.ANO.ICOST.Eo.O)  GO  TO  2200 
DO  1700  1=1 ,NP 
I RO ( I  )=0 
000(I)=FNCS(I) 

NOUMMYrNP 
00  1  SCO  A  —  1  ,NP 

CALL  PA  XC  (NDUHNT  ,NOUT| 

I R  0 1 K )=NOUT 
1 1 =1  ROCK ) 

000(11 >=-l . 

DO  2100  1=1 «NP 
1 1  =1 R  0(  I  ) 

IF  (IORO.LE.O)  II=HCU) 

IF  ( M00( 1-1 ,50) .NF.2 )  GC  TO  2000 
WRITE  (6,2800)  CASE 
IF  (INO. EC. 1)  URtTE  ( f , 7N00 ) 

IF  (IN0.E0.2)  WRITE  (6.3500) 

WRITE  (6,3600) 

IF  (ICOST.EO.l)  WRITE  (6,3100)  CL , ACL  ,  IOC C C INO ) 

WRITE  (6,3700) 

WRITE  (6,3600) 

WRITE  (6,3800) 

WRITE  16,3600) 

TC=100.*CNCS( II )/ (C»INT« .000001) 

WRITE  (6.3900)  I. II  ,ANSN(TI  )  ,  A OE SC ( 1 1 )  ,  RNCS (I  I  )  ,CNC S ( 1 1  )  , TC 
IF  (ICOST.EO.l)  RETURN 
I  COST-1 

IF  (I0PT5.LE.0)  GO  TO  2S00 
NN  =  I MS  E  L/5 

IF  (h0C(IMSEL.5).NE .0)  NN=NN* 1 
IF  (NN.GT.20)  NN-20 
DO  2900  L=1  ,NN 

Ml  =1 PT ( 1* (L-l )*5» 

H2=tPT ( 2* (L-l )*5) 

M3=IF7(3* (L-l ) *5 ) 

H9=IPTI9«CL-1 1*5) 

M5=IFT(5« (L-l )*5> 

00  2300  1=1, NW 

IF  (MOO (1-1,50) «NE .0 )  GO  TO  2300 
WRITE  (6.2800)  CASE 
IF  (INO. CO. 1)  WRITE  ( 6 , 4000 ) 

IF  (InO.EO.2)  WPITE  (6,9100) 

WPITE  (6,3600) 

WRITE  (6,9200)  Ml , M2 , M 3 ,M9 , M5 


B-22 


16% 

1  65 

1  66 

167 

168 

1  69 

170 

171 

172 

173 

1  7% 

1  75 

1  76 

177 

1  78 

179 

180 

1  81 

182 

183 

18% 

185 

186 

1  87 

1  88 

1  89 

1  90 

191 

192 

193 

19% 
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WPITE  16,3600) 

WRITE  16,6300)  AMSNIH1I  ,A MSN |M 2 ) ,AM SN <M 7 )  ,A"SNIM6)  ,AmSnIM5I 
WRITE  I  6,  6  3C0  )  A0tSCl''ll,A0ESCIN2l,ADCSC|M3i,A0>-SCtM4l,A0ESCIH 

♦  5) 

WRITE  16,6600) 

WRITE  16.3600) 

2300  WRITE  16, *500)  1 1  ,S4 1 1 , K « IL-1 ) *5  I  ,  K  =  1 , 5 ) 

24'P  CONTINUE 
2500  10CClIN01=0 

DO  2 TOC  1  =  1  ,NW 

IF  IMCOf 1-1,50>.NE.0>  GO  TO  2600 
WRITE  16, 26001  CASE 
IF  IIND.EO.il  WRITE  16,6600) 

IF  IIN0.E0.2)  WRITE  16,6700) 

WRITE  16,3600) 

WRITE  16,4600) 

2600  IF  IDC0STFI1)  .6T.CL)  GO  TO  2700 
ITCC  UNO  )  =1 
A  CL  =  OCOSTF II) 

2700  WRITE  16,4900  1  I ,DC OST F I I ) , DC OST 11 1 ) 

WRITE  16,3100)  CL.ACL.1DCC I 1ND  > 

RET  URN 

2600  FORMAT  I1H1  ,30*, ’CASE:  *,*16) 

2900  FORMAT  1/ , 1  OX  ,  ’ I OT A L I T NI T  STK=  01  COST  CF  POLICIES’) 

3C00  FORMAT  l/,10X,’RES10U ALII  MIT  STK=CURR  STKI  COST  OF  POLICIES’) 

3100  FORMAT  I//,  10X, ’COST  LIMIT  0F’,F12.0,’  APPROXIMATED  BT’,F12.0,»  TH 
♦E  CUM  POMT  COST  THRU  DAT*,  16) 

3200  FORMAT  I/,’  POLICY  TOT  COST* ) 

3 300  FORMAT  I/,’  PART  SUB’, FI*. 0) 

3400  FORMAT  I/,’  TOTALCINIT  STK=0)  S TK  ROMTS  BY  POLICY  •) 

3500  FORMAT  l/,30X,’RES10UALIINIT  STXrCURR  STKI  STK  RQMTS  BY  POLICY  ’) 
3600  FORMAT  l/i 

3700  FORMAT  I66X  ,’PART  SUJST’I 

3  6C0  FORMAT  1 1  OX  ,’PART  NR  ’  ,  1  7 X  .  ’  PA  P  T  ’  . 2 1 X  ,  *  R  OMNT  ’  ,  7X  ,  •  CO  S T  XCOST’I 
39C0  FORMAT  I2X , 15,1 10,5 X.B 16, 7X ,A 1 6 ,Fe . 1  ,F 1 ?.0,F6 .2  ,6X I 

4000  FORMAT  l/,42X,’CUM  total  pqmtiinit  stk=oi  RFQUIPEO  THRU  GIVEN  OAy’ 

♦  I 

6100  FORMAT  l/,42X,’CUM  AOO-ON  R0MTI1NIT  STK=CURR  1NVI  REOU1REO  ’,’THRU 
«  GIVEN  DAY’) 

6200  FORMAT  II 3X  ,5 I6X , ’PART  NR’, 15, 6*)) 

4300  FORMAT  II 3X  ,5IA 16,6X1  I 

4470  FORMAT  I15X .’CAY* ,2 IX, ’0AY*,21X, ’OAY’, 16X, ’PAY* ,21* ,’OAY* 1 

4  5C0  FORMAT  IBX, 51110, F6  .1,6X1 ) 

6600  FORMAT  l/,12X,’CUM  TOTALIINIT  STK=OI  COST  OF  REO  THPU  GIVEN  OAY’I 
4700  FORMAT  1/  ,1 2X  ,  ’CUM  RE  3  I T U A  L  II  N 1  T  STK=  CURR  STKI  COST  OF  REO  THRU’, 
♦’  GIVEN  OAY’I 

4600  FORMAT  l/,6X,’DAY’, 3X, ’  PART  SUB’) 

4900  FORMAT  I6X, 13 ,3X,2F 11.01 
ENO 
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(NOT  USED) 
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SUBROUTINE  MAXC 


SUBROUTINE  MAXC  < NO UM* Y #NCUT| 

NAME:  MAXC  TYPE:  SUBROUTINE 

PURPOSE:  THE  MAXC  SUBROUTINE  FINDS  THE  SUBSCRIPT  OF  THE  L*RGESTIIN  VALUE 
MEMBER  OF  AN  ARR»Y  ICOOIJ)) 


CAILEQ  BY: 

-  MAIN  PROGRAM 

-  SUBROUTINE  UCR3PS 

-  SUBROUTINE  CCLIST 


CALLS  :  NONE 

FILES  USEO  :  NO  FILES  RE AO  OR  WRITTEN 


COMMON 

♦  AC  1  120  )  , 

4  ALLCrfB  1 120)  , 

♦  AVM1Z0K 

4  CO MDA I  300 1 • 

4  CNCTI3G0), 

4  OC  CST  F I  120  )  « 

4  OC 0  1 30 0  )  V 

4  FH  R  1 1 20  )  « 

4  IF  S  1300  1  v 

4  IP  T 1 1 00  )9 

4  NP  « 

4  PT D FP I  3 CQ  , 2 9  1 

4  SMI  120*  1001  « 

4  iRNrstSooif 

CHARACTFR916 
4  AO  ESC  v 

SMAX--1 • 


AMS  N ( 3PQ  1 
BCYl70n>f 
CFI 3001 • 
COS  T I 3r  0  1 
ocr I  3001 1 
FH* 11201, 
ICOST, 

IM  5  EL  * 

IRC  I  300)  , 
NP  1  , 

OP*  I  30r  1  • 
SP*«Xl  «30( 
TSTk«300) 

ADS  C* 


JMAXZl 

00  ICC  J  - 1 ,NOUMMY 
X  =00 0  (J) 

ZMAXrAMAX  1ISMAX,X  1 
IF  izmax.le.smaxi  GO  TO  100 
JM  A X  - J 
S  M  AX -7M AX 
100  CONTINUE 
N  OUT -JM AX 
RETURN 
ENO 


A  3  KJ  n  «  i  1LU 

BF  1300), 
CL  , 

CRNCS  1300 
OF  1  300), 
FHM, 

IOCCI 2)  . 
INSI3CCI , 
IR01 3001 , 
NP2, 

RNCI 120) , 
STK 1 3001 , 
TSUKB 


AM SN  , 


ALLOW  1  11201, 
AV  AVC I  6)  , 
CASE, 

CM  I N  T  * 

DC  OS  »  1  1300), 
OMOI  300)  , 

F  H  P  A  P  0  I  3 ,1  20  ) 
IFHC 1 120)  , 
INT. 

ISHORT  . 

NW  , 

RNCS I  3001  , 
SUMB 11201, 


t 


CASE 
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(NOT  USED) 
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FUNCTION  SR 


FUNCTION  SR 
NAME?  SR 


I ,J,CDM0» 

TYPE:  FUNCTION 


PURPOSE 


THF  SR  (STOCK  RE"UJfirDI  FUNCTION  CALCULATES  THE  CULnUlATIYE 
NET  DEMAND  THRU  t  SPCCTFDIEO  0*Y  FOR  A  SPECIFIED  PART  EASED 
ON  A  SPECIFIED  FLYING  PROQPAM.  INITIAL  I N  VF  N  TO  0  Y  =0  IS 
ASSUMED  TN  IMIS  CALCULATION.  NET  DEMANDS  IS  PASICALLY 

failed  items  offset  fy  returning  repairs,  in  a  sense  it*s  the 

net  NR  OF  'HOLDS'  (CAUSED  BY  THE  I  TEM I  WHICH  A*"E  PRESENT  ON 
A  SPECIFIED  DAY  .ASSUMING  A  ZERO  INITIAL  INVENTQPY. 


CALLED  BY: 

-  SUBROUTINE  UCRDPS 

-  SUBROUTINE  UCCAP 

-  SUBROUTINE  CCCAP 

CALLS  :  NONE 

FILES  USEO  :  NO  FILES  RCAD  OR  WRITTEN 


COMMON 


AC  (  1201  , 

ACL, 

AOESC  I  3001. 

ALLOW] (1201, 

ALLTwB  t  1201 « 

*MSNt3n0l, 

ASU°V  1120  1, 

AV  A V  G  (  61  • 

AVM  (120  >• 

BCT ( 30P) , 

BF (3001, 

CASE  , 

COPOA 1 300 1 , 

CFI  300)  , 

CL  , 

CM  IN  T  • 

DC  OS  T 1  (300  1, 

CNCSi 3001 t 

COST(3C!o), 

CRNCS ( 300 1 , 

0CCS1F 1 1201 t 

OCr(30C), 

OF (3001, 

OMP( 3001 , 

000(300), 

FHM12P), 

FHM, 

FHPAPDI3,120» 

Fur  (120), 

ICOST, 

I0CCC2I, 

IFHC  « 120? , 

IFS  (300  If 

I H?  Ft , 

INS( 3001 , 

INT, 

IP!  (100  1, 

IRCIJ001, 

IP 0  1  3 00 1  , 

ISHOPT . 

NP, 

NP!  , 

OP*  t  300) . 

SRHA t  1  f  3 00  )  , 
TST  k ( 3  00  ) , 

NP2. 

PNCI 1 ?0» , 

NW  , 

PT0FP(300,24I , 

RVCSI300I , 

SM (  120, IOC)  , 
TPNCSI3001, 
CHAR AC  TER*1 6 

STK ( 3001 , 
TSUMB 

SU**B  I  120»  , 

AOFSC, 

IO  =  I~OCY(  J) 
IB=I-BCTI  J) 

ORR-n. 

ADS  C  , 

AM  SN  , 

CASE 

PR  =  0. 

F  IIO.GT.CI  PRRrDF (JIPFHAflOl 


IF  (IB.GT.OI  BRR=BF (JI*FHA(IB) 
SR=COMO«CF I JI»FHA II I-DRR-PRR 
RCTURN 
ENO 
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(NOT  USED) 
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SUBROUTINE  DIST 


SUBROUTINE  OISI  (  IFO  AY  ,  ILDAY  , 0 AM  T  ,K  ) 

NAME:  DIST  TYPE:  SUBROUTINE 

PURPOSE:  THE  OIST  (PARTS  0  I S T R 1 8 U TI 0 N )  SUBROUTINE  DISTRIBUTES  THE 
STARTING  SPARES  STOCK  OF  A  PART  TYPE  OVER  A  SERIES  OF  5-DAY  INTERVALS 

CALLED  8  Y  ;  MAIN  PROGRAM 

CALLS  :  NONE 

FILES  USED  ;  NO  FILES  RE  AO  OR  WRITTEN 


COMMON 

AC  1 120  )  | 
ALLOWS (120) t 
AVM  (120 )  , 
CDMDA (300) i 
C  NC S ( 3  DO  )  « 
OCoSTF (  1  2  □  )  , 
ODO ( 3 00 )  , 

FHR (120)  , 

IFS 13001  , 

IPT (100)  , 

N  P 

PTOEP ( 300,24) 
SM(120 ,100)  , 
TRNCS ( 300) , 

CH A  R  A  CT  ER ♦ 1 6 
ADESC, 


ACL, 

A  MS N (300 ) , 
BCY  (  3D0)  i 
C F  f  5  CO  1  i 
COST  13  00  J  i 
DC Y I  300)  , 
12C1 , 
ICGST, 
IMSEL, 

IRC ( 3u  D ) . 
NPl  , 

OPA  (  300)  , 
SRMAX1 ( JCO) 
TSTK (300) , 

A  OS  C  , 


AOE  SC (  300)  , 
ASURV  (123)  , 
BF  (  3Q0)  , 

CL  , 

CRNCS  ( 300 )  , 
OF  (  330)  , 

FHM  , 

IOCC(  2)  , 

INS  (303) , 
IRO  (300 ) , 

NP  2  , 

RNC (1 20 )  , 
STK (300 ) , 
TSUMB 

AMSN, 


ALL0W1 (120) 
AV  AVS ( 6)  i 
CASE, 

CMINT , 

D  COST  1  (300) 
D  M  0  (  3  n  Q  )  , 
FHPARD  (3 , 

I F  H  C( 1 20) 

I  NT, 

ISHORT , 

R  N  ts  (  3  DU  ) 

S  U  M  b(  1 20) 


120  ) 


♦  ADESC,  A  OS  C  , 

01=-l  (IFOAY-l  >/5)  *5*  IFOAY -1 
DL-“ (  ( ILOAY-1 ) /5) *5* ILOAy 
Il-HIN0(24 , ( lFDAY-1 ) /5  ♦ 1) 

I L  -M I  NO ( 2  4 , ( ILOAY-1) /5*1) 

IF  (I l.LT .  IL  )  GO  TO  100 
PTOEP (K,I1)=PT0EP(K, II ) ♦( OL -01 1^0  AMT 
RETURN 

I  DO  200  1  =  11, IL 

IF  (I  .EQ  .11)  PTOEP (K,  II =PTOEPIK , l) ♦ (S .-Dl ) ♦OAMT 
IF  (I  .EO.Ii  )  PTOEp  (K  ,  I  )  rpjOEP(K  ,1  )  ♦  OL  *0  AMT 
IF  it  .GT  .1  l.AND  .l.LT  .IL  )  PTOEP  < H , I ) TDEP ( K, I ) ♦ 
I  CONTINUE 
RETURN 


5 .♦0AM  T 
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GLOSSARY 


AC 

acft 

AFH 

ASL 

AVAIL 

CAA 

CUM 

DC 

DCSLOG 

DEPL 

DRT 

EFH 

EST 

FHP 

FS 

HR 

I N  IT 
M 

MAX 

MAX  FLY 

MIN 

NMCS 

NRTS 

NS 

NSN 


aircraft 

aircraft 

achieved  flying  hours 
authorized  stockage  list 
avai labi 1 ity 

US  Army  Concepts  Analysis  Agency 
cumulative 

depot  condemnation  rate 

Deputy  Chief  of  Staff  for  Logistics 

deployed 

depot  repair  time 
estimated  flying  hours 
estimated 

flying  hour  program 
full  substitution 
hour 

initial  inventory 
mi  1  lion 
maximum 

Maximizing  Daily  Helicopter  Flying  Hours  (study) 
minimum 

not  mission  capable  due  to  supply 
not  repairable  at  this  station 
no  substitution 
national  stock  number 
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OPTP 

Overview/PARCOM  Turnkey  Project 

ORIG 

original  initial  inventory 

OST 

order  and  ship  time 

PARCOM 

Parts  Requirements  and  Cost  Model 

PGM 

program 

PLL 

prescribed  load  list 

PT 

part 

QPA 

quantity  per  application 

RET 

returned 

RQMT 

requirement 

RQR 

required 

RT 

rate 

SOL 

solution 

STK 

cumulative  stock  distributed 

SURV 

surviving 

USAVSCOM 

US  Army  Aviation  Systems  Command 
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PARTIAL  SUBSTITUTION  AND  OTHER 

STUDY 

-  CAA  MODIFICATIONS  TO  THE  PARCOM  MODEL 

SUMMARY 

(PARCOM  PARTIAL  SUBSTITUTION) 

CAA-TP-84-1 1 

THE  REASON  FOR  PERFORMING  THE  STUDY  was  that  the  two  models  recommended  by 
the  Aircraft  Spares  Study,  Overview  and  PARCOM,  could  treat  a  full- 
substitution  or  a  no-substitution  part  replacement  policy  but  lacked  the 
ability  to  represent  a  more  realistic  partial-substitution  replacement 
policy.  Of  the  two  models,  PARCOM  was  judged  to  be  the  better  candidate 
for  incorporation  of  a  partial-substitution  capability. 


THE  PRINCIPAL  FINDINGS  of  the  work  reported  herein  are  as  follows: 

(1)  The  basic  PARCOM  (Parts  Requirements  and  Cost  Model),  developed 
for  the  Aircraft  Spares  Study,  was  extended  to  include  the  effects  of 
partial-substitution  replacement  policies  and  deployment  of  initial  stocks 
over  time. 

(2)  The  resulting  extended  model  relates  spare  requirements  to  a 
flying  hour/aircraft  availability  objective,  parts  replacement  policy,  and 
stockage  deployment  schedule — all  subject  to  optional  cost  constraints. 
Example  applications  illustrated  the  plausibility  of  the  model  logic. 

(3)  The  extended  PARCOM  significantly  expands  the  range  of  application 
and  results  of  the  basic  PARCOM  methodology.  As  such,  its  implementation, 
in  place  of  basic  PARCOM,  is  warranted. 


THE  MAIN  ASSUMPTION  was  that  partial  substitution  can  be  usefully  defined 
in  terms  of  a  partition  of  part  types  into  a  full-substitution  part  set  and 
a  no-substitution  set. 


THE  PRINCIPAL  LIMITATION  was  that  definitions  of  partial  substitution  other 
than  the  assumed  definition  might  not  be  addressable  by  the  extended  PARCOM. 


THE  SCOPE  OF  THE  STUDY  addressed  the  relationship  of  spare  requirements  and 
fleet  capability  for  a  notional  Army  aviation  program  to  a  flying 
hour/avail abil ity  objective,  part  replacement  (substitution)  policy,  and 
stockage  deployment  schedule— all  subject  to  optional  cost  constraints. 

The  study  applied  the  subject  model  to  an  example,  using  four  part  types 
over  5  days,  and  to  an  all-up  case,  treating  an  AH-1S  scenario  involving 
334  part  types  over  120  days. 


THE  STUDY  OBJECTIVES  were: 


(1)  To  evaluate  the  potential  for  extending  the  capability  of  the 
basic  PARCOM,  developed  in  the  Aircraft  Spares  Study,  to  include  partial 
substitution  and  other  desirable  features  lacking  in  the  basic  PARCOM. 

(2)  To  make  the  above  extensions  and  to  report  on  and  illustrate  the 
application  of  the  extended  PARCOM  and  methodology. 


THE  BASIC  APPROACH  was: 

(1)  To  assess  the  limitations  of  the  basic  PARCOM. 

(2)  To  select  features  and  capabilities,  to  include  partial  substi¬ 
tution,  for  incorporation  into  an  extended  PARCOM. 

(3)  To  develop  an  extended  PARCOM  incorporating  the  selected 
capabilities. 

(4)  To  report  on  the  nature  of  the  extended  PARCOM  methodology  and 
model  through  exposition  and  illustrative  example  applications. 


THE  STUDY  SPONSOR  was  the  Deputy  Chief  of  Staff  for  Logistics,  Headquarters, 
Department  of  the  Army. 


THE  STUDY  EFFORT  was  conducted  by  Mr.  Walter  J.  Bauman,  Force  Systems 
Directorate,  US  Army  Concepts  Analysis  Agency. 


C0W1ENTS  AND  QUESTIONS  may  be  directed  to  the  Director,  US  Army  Concepts 
Analysis  Agency,  ATTN:  CSCA-FS,  8120  Woodmont  Avenue,  Bethesda,  Maryland 
20814-2797. 
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5  2  MODIFICATIONS  TO  THE  PARCOM  MODEL 


STUDY 
SUMMARY 
CAA-TP-84-1 1 


(PARCOM  PARTIAL  SUBSTITUTION) 


THE  REASON  FOR  PERFORMING  THE  STUDY  was  that  the  two  models  recommended  by 
the  Aircraft  Spares  Study,  Overview  and  PARCOM,  could  treat  a  full- 
substitution  or  a  no-substitution  part  replacement  policy  but  lacked  the 
ability  to  represent  a  more  realistic  partial-substitution  replacement 
policy.  Of  the  two  models,  PARCOM  was  judged  to  be  the  better  candidate 
for  incorporation  of  a  partial-substitution  capability. 


THE  PRINCIPAL  FINDINGS  of  the  work  reported  herein  are  as  follows: 

(1)  The  basic  PARCOM  (Parts  Requirements  and  Cost  Model),  developed 
for  the  Aircraft  Spares  Study,  was  extended  to  include  the  effects  of 
partial-substitution  replacement  policies  and  deployment  of  initial  stocks 
over  time. 

(2)  The  resulting  extended  model  relates  spare  requirements  to  a 
flying  hour/aircraft  availability  objective,  parts  replacement  policy,  and 
stockage  deployment  schedule — al 1  subject  to  optional  cost  constraints. 
Example  applications  illustrated  the  plausibility  of  the  model  logic. 

(3)  The  extended  PARCOM  significantly  expands  the  range  of  application 
and  results  of  the  basic  PARCOM  methodology.  As  such,  its  implementation, 
in  place  of  basic  PARCOM,  is  warranted. 


THE  MAIN  ASSUMPTION  was  that  partial  substitution  can  be  usefully  defined 
in  terms  of  a  partition  of  part  types  into  a  full-substitution  part  set  and 
a  no-substitution  set. 


THE  PRINCIPAL  LIMITATION  was  that  definitions  of  partial  substitution  other 
than  the  assumed  definition  might  not  be  addressable  by  the  extended  PARCOM. 


THE  SCOPE  OF  THE  STUDY  addressed  the  relationship  of  spare  requirements  and 
fleet  capability  for  a  notional  Army  aviation  program  to  a  flying 
hour/availability  objective,  part  replacement  (substitution)  policy,  and 
stockage  deployment  schedule— all  subject  to  optional  cost  constraints. 

The  study  applied  the  subject  model  to  an  example,  using  four  part  types 
over  5  days,  and  to  an  all-up  case,  treating  an  AH-1S  scenario  involving 
334  part  types  over  120  days. 


THE  STUDY  OBJECTIVES  were: 


(1)  To  evaluate  the  potential  for  extending  the  capability  of  the 
basic  PARCOM,  developed  in  the  Aircraft  Spares  Study,  to  include  partial 
substitution  and  other  desirable  features  lacking  in  the  basic  PARCOM. 

(2)  To  make  the  above  extensions  and  to  report  on  and  illustrate  the 
application  of  the  extended  PARCOM  and  methodology. 


THE  BASIC  APPROACH  was: 

(1)  To  assess  the  limitations  of  the  basic  PARCOM. 

(2)  To  select  features  and  capabilities,  to  include  partial  substi¬ 
tution,  for  incorporation  into  an  extended  PARCOM. 

(3)  To  develop  an  extended  PARCOM  incorporating  the  selected 
capabilities. 

(4)  To  report  on  the  nature  of  the  extended  PARCOM  methodology  and 
model  through  exposition  and  illustrative  example  applications. 


THE  STUDY  SPONSOR  was  the  Deputy  Chief  of  Staff  for  Logistics,  Headquarters, 
Department  of  the  Army. 


THE  STUDY  EFFORT  was  conducted  by  Mr.  Walter  J.  Bauman,  Force  Systems 
Directorate,  US  Army  Concepts  Analysis  Agency. 


COMMENTS  AND  QUESTIONS  may  be  directed  to  the  Director,  US  Army  Concepts 
Analysis  Agency,  ATTN:  CSCA-FS,  8120  Woodmont  Avenue,  Bethesda,  Maryland 
20814-2797. 


